Дана программа которая ищет сумму однозначных чисел, - вопрос №8299201 от ашпшплщ 30.04.2021 02:14

Question

Информатика: Дана программа которая ищет сумму однозначных чисел, с командой while исправьте её на программу с командой for program dj; var x,y: integer; begin y: =0; x: =1; while x 10 do begin y: =x+y; x: =x+1; write (y); end.

ашпшплщ · Answer

2) Program dj;Var x,y:integer;beginy:=0;for x:=1 to 9 do beginy:=x+y;write (y);end....