Язык Паскаль, сделать 13 вариант через опиратора while, по типу второго фото.

xalva123 1 22.02.2022 11:17 2

Question

Информатика: Язык Паскаль, сделать 13 вариант через опиратора while, по типу второго фото.

xalva123 · Answer

Pascalvar  i:integer;begin  i:=100;  while i =999 do begin    if (i div 100) + (i mod 10) = 2 then      writeln(i);    inc(i);  end;  end....

Язык Паскаль, сделать 13 вариант через опиратора while, по типу второго фото.