Определите, что будет напечатано в результате работы следующей программы

[email protected] в категроии Информатика, вопрос открыт 19.05.2018 в 15:53

Var s,k: integer;
Begin
s:=100
for k:= 2 to 7 do
s:=s -10
write (s)
End.

Определите, что будет написано в результате работу следующей программы:
Var k, i: integer;
Begin
k:=2;
For i:= 1 to 4 do
k:= 2*i+k;
Writeln(k);
End.