Выведите на печать все нечётные элементы таблицы в паскале 1 2 3 4 5 6 7 3 -4 0 2 -7 4 0

Даниил5356 Даниил5356    1   16.06.2019 20:40    0

Ответы
Masha7698755g Masha7698755g  13.07.2020 17:25
Var i: integer;
begin
  for i:=0 to 254 do
  begin
    if i mod 2=0 then break else write(ord(i));
  end;
  readln;
  readln
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика