Дана программа которая ищет сумму однозначных чисел, - вопрос №8299201 от Dasha16082678 28.05.2020 07:13

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.

Dasha16082678 · Answer

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