Предмет: Информатика,
автор: karkatvantas04
СРОЧНО!!! Самостоятельная по информатике "Циклы"
Приложения:

Ответы
Автор ответа:
1
Ответ:
1)10
2) 1 раз
3)
Begin
Readln(n);
S:=0;
For i:=1 to n do
S:=s+i;
Write(s);
End.
4)
Begin
I:=1001;
While (i<10000) do
Begin
I:=i+7;
Writeln(i);
End;
End.
Похожие вопросы
Предмет: Математика,
автор: anna13931
Предмет: Литература,
автор: YACHELOVEK5939
Предмет: Қазақ тiлi,
автор: maniy2885
Предмет: Литература,
автор: niak32
Предмет: Математика,
автор: сашуляаннаа