Не понимаю как решить фрагмент программы k:=0;
For i:=1 to 4do
For j:=1 to i+1 do
k:=k+1;
в результате выполнения нужно найти значение k

bigofficerjor bigofficerjor    2   20.01.2022 00:31    0

Ответы
gubankowauly19 gubankowauly19  20.01.2022 01:00

14

Объяснение:

var k,i,j:integer;

begin

k:=0;

For i:=1 to 4 do

For j:=1 to i+1 do

k:=k+1;

write(k);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика