
Kunashsip
5 год назад
var s, k: integer;begin s := 40; for k := 1 to 7 do s := s - 3; write (s);end.
ОТВЕТЫ

Onufrij
Oct 24, 2020
var
s, k: integer;
begin
s := 40;
for k := 1 to 7 do
s := s - 3;
write(s);
end.
Вывод 19
Модераторам - если нужно, то можно удалять без предупреждения
s, k: integer;
begin
s := 40;
for k := 1 to 7 do
s := s - 3;
write(s);
end.
Вывод 19
Модераторам - если нужно, то можно удалять без предупреждения
970