Регистрация
Войти
Стать экспертом Правила
Информатика

Напишите (паскаль)программу которая выводит на экран числа 20 40 80 160 320

ОТВЕТЫ
Var
  n:integer;
begin
  n:=20;
  while nlt;=320 do begin
    Write(n, );
    n:=2*n
    end
end.

Результат работы
20 40 80 160 320
242
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам