Составьте программу нахождения суммы всех четных чисел от 10 до 100.

1) использовать цикл с предусловием.

2) использовать цикл с постусловием.

3) использовать цикл с параметром.

Question

Информатика

Рена

13 июня, 00:43

Составьте программу нахождения суммы всех четных чисел от 10 до 100.

1) использовать цикл с предусловием.

2) использовать цикл с постусловием.

3) использовать цикл с параметром.

+4

Ответы (1)

Знаете ответ?

Аполлос · Answer 1

Var i: byte;

begin i : = 10; while i < = 100 do begin if not odd (i) then write (i, ' ') ; inc (i) ; end; writeln; i : = 10; repeat if not odd (i) then write (i, ' ') ; inc (i) ; until i = 101; writeln; for i : = 10 to 100 do if not odd (i) then write (i, ' ') ; end.