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

Ответы 1

  • var i: integer;begin  for i:=0 to 254 do  begin    if i mod 2=0 then break else write(ord(i));  end;  readln;  readlnend.
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years