Ответ на задачи и их решения
0 голосов
19 просмотров

помогите написать на паскале программу для вычесления суммы четных чисел от 0 до 10 с выводом результата

от (12 баллов) в категории Информатика | 19 просмотров

1 Ответ

0 голосов

var s, i: integer;

begin

  s:= 0;

  for i:= 0 to 10 do 

    if i mod 2 = 0 then s:= s + i; {если остаток от деления на 2 равен 0, то прибавляй i к сумме}

  write('Сумма равна ', s);

end.

от Одаренный (2.1k баллов)
Здравствуйте! На сайте Otvet-Master.ru собраны ответы и решения на все виды школьных задач и университетских заданий. Воспользуйтесь поиском решений на сайте или задайте свой вопрос онлайн и абсолютно бесплатно.
10,984,878 вопросов
13,471,016 ответов
8,518,553 комментариев
4,909,216 пользователей