урок 10.1 задача 3

Primary tabs

isaac_fan's picture
Submitted by isaac_fan on Fri, 04/15/2022 - 18:20

Forums:

урок 10.1

Выведите на экран, все четные числа от 35 до 64.

var
i:integer;
begin

  for i:=35 to 64 do
    write(i, ' ');

  readln();
end.

что должно вывести:

вот

  • Log in to post comments
  • 993 reads
isaac_fan's picture

isaac_fan

Fri, 04/15/2022 - 18:23

ух долго я думал как картинку превратить в сылку :)

isaac_fan's picture

isaac_fan

Tue, 04/26/2022 - 17:42 

Program ss;
var i : integer;
begin
For i := 35 to 117 do if i mod 2 = 0 then write (i+',');
writeln;