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

Question

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

Answer 1

47

kasim89

17 августа 2022

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.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: