напишите программу, которая в последовательности натуральных чисел определяет сумму трехзначных чисел кратных 6. программа получает на вход натуральные числа количество введенных чисел неизвестно последовательность чисел заканчивается числом 0 ( 0 признак окончания ввода не входит в последовательность) количество чисел не привышает 1000 введенные числа не привышают 30000. программа должна вывести одно число сумму трехзначных чисел кратных 6. пример программы вводные данные 120, 9, 365, 4, 0

1) Какое число будет выведено на экран после выполнения этого фрагмента программы?

write(1);

for i:=2 to 3 do  цикл будет работать ровно 2 раза

write(i); тут получается с начала выведется число 2 потом 3

ответ 3

2) Чему будет равно значение целой переменной «a» после выполнения этого фрагмента программы?

a:=2;

for i:=0 to 2 do Цикл будет работать 3 раза

begin

a:=a+i 2+0=2 2+1=3 3+2=5

end;

ответ 5

3) Чему будет равно значение целой переменной «a» после выполнения этого фрагмента программы?

a:=10;

for i:=1 to 3 do Цикл будет работать 3 раза

begin

a:=a-1 10-1=9 9-2=7 7-3=4

end;

ответ 4

Объяснение:

Что мы знаем о войне немного  по рассказам бабушек и мам  знаем, что надежда и тревога  об руку ходили по домам  слухи зависали  как знамена  дымом застилался горизонт  многоверстный и многоименный  жаждал крови ненасытный фронт  а из тыла за волной волна  шла латать верховные промашкивсасывала мальчиков война   и выплевывала мертвые бумажкикаждый шаг   к победе ли к бедесводки измеряли расстояньем  даже самый распобедный день  был комуто вечным расставаньемгоды возвращающий экраночевидцев честные романывсе равно останутся обманомссадины не заменяют рантолько изредка за толщей дней  вдруг всплеснёт сирены голос лютыйзамирая криками детей  и застынет сердце на минуту