Program char;

var s, k: integer;

begin

s=100;

for k:=0 to 10 do

s:=s-5;

writeln (s) ;

end.

Question

Аверий

20 августа, 22:47

+4

Ответы (1)

Знаете ответ на вопрос?

Рубен · Answer 1

Это можно посчитать так: в цикле 11 действий, каждое действие уменьшает s на 5, получается 100-11*5=45

Program char;var s, k: integer;begins=100;for k:=0 to 10 dos:=s-5;writeln (s) ;end.