Регистрация
asadbek7703
14.03.2023 13:02
Информатика
Есть ответ 👍

Вопросы по word. Нужно на них ответить​

231
497
Посмотреть ответы 1

Ответы на вопрос:

farhinura10009
farhinura10009
4,6(23 оценок)
От одного до пяти

через for

var i,x: integer;

begin

x : = 1;

  for i : = 1 to 5 do

  begin

    write(i);

  end;

  writeln;

или так через while

var i,x: integer;

begin

  x :
= 1;

  while x< 5 do

  begin

    write(x);

  end;

  writeln;

p.s. paskalhren'

Популярно: Информатика