Question

3. Программу, записанную в виде блок-схемы, запишите на Паскале:

Начало,

K:=2

N:=3

K+N<10

K:=K+2

N:=N+1

Конец

Answer 1

Ответ:

var k,n:integer;

begin

 k:= 2;

 n:= 3;

 while k+n<10 do

 begin

   k:=k+2;

   n:=n+1;

 end;

 writeln(k);

 writeln(n);

end.