Регистрация
Unknown2281
06.12.2022 08:31
Информатика
Есть ответ 👍

Дана ненулевая последовательность целых чисел, заканчивающаяся нулем. Вывести на экран все числа
этой последовательности, которые больше нуля и
делятся на 3.
Program posledovat;
Var a:integer;
Begin
Writeln (‘введите первый член последовательности’);
Readeln (a);
Repeat
If (a>0) and (a mod 3 =0) then
Writeln (a)
Until a=0;
end.

112
437
Посмотреть ответы 1

Ответы на вопрос:

Арчи171
Арчи171
4,5(67 оценок)

из а в е можно попасть следующими путями:

1) а-с, с-е = 4+5=9

2) а-в, в-е = 2+7=9

3) а-с, с-d, d-e = 4+3+3=10

4) a-b, b-c, c-e = 2+1+5=8

5) a-b, b-c, с-d, d-e = 2+1+3+3=9

ответ: самый короткий маршрут от а до е равен 8 км.

Популярно: Информатика