Question

Написать программу на паскале по кусочку блок схемы

Answer 1

Ответ:

i:=1;

repeat

k:=k+1;

i:=i+0.1;

until i>6

write('K=',k:6:2);