Вариант А

1) Опишите, что выполняет данная программа. Приведите пример на конкретных числах:

var a, b, s, j:integer;

begin

read (a, b) ;

s:=0;

for j:=a to b do

begin

s:=s+j;

end;

write (s) ;

end.

2) Напишите программу, которая выводит все четные числа до заданного пользователем числа.

Question

Информатика

Ируша

10 декабря, 06:57

Вариант А

1) Опишите, что выполняет данная программа. Приведите пример на конкретных числах:

var a, b, s, j:integer;

begin

read (a, b) ;

s:=0;

for j:=a to b do

begin

s:=s+j;

end;

write (s) ;

end.

2) Напишите программу, которая выводит все четные числа до заданного пользователем числа.

+3

Ответы (1)

Знаете ответ на вопрос?

Доняша · Answer 1

1) Программа находит сумму всех чисел от a до b. Например для 3 и 5, она выведет 12

2)

var

a, i:integer;

begin

read (a) ;

for i : = 1 to a do

if i mod 2 = 0 then

write (i, ' ') ;

end.