• Рассчитать и вывести произведение чисел от 1 до 30

Ответы 3

  • var i: integer;begin for i:= 1 to 30 do writeln(i);end.
  • program oneTO30varh:integer;BEGINfor int i:=2 to 30 doh:=h*i;writeln(h);  \\или readln ... забылEND.
  • var    i: integer;  begin  for i:= 1 to 30 do  writeln(i);end.Вот код вывода чисел от 1 до 30, либо я не понял вопроса, либо вам дорога не в программирование
    • Автор:

      kodyyqvx
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

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

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

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