Определите , что будет напечатано после выполнения программы: var k, s : integer ;
begin
k := 1;
s := 3;
while s < 100 do
begin
s := s + 5 ;
k := k + 2
end;
write(k)
end

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку