Разберите и выполните программу , выходящую на эран вск четные числа в интервале от 1 до 40

Ответы:
Радислав Бочаров
30-03-2014 00:53

Program z1;Var i: integer; BeginFor i:=1 to 40 do beginIf (i mod 2=o) then writeln(i);End; End. Это в паскале

Виктория Ляшчук
30-03-2014 11:07

Var  i:longint;begin for i:=1 to 40 do If odd(i) then else write(i);end.

Также наши пользователи интересуются:

Картинка с текстом вопроса от пользователя ЮЛИЯ АЛЕКСАНДРОВСКАЯ

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Разберите и выполните программу , выходящую на эран вск четные числа в интервале от 1 до 40» от пользователя ЮЛИЯ АЛЕКСАНДРОВСКАЯ в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!