СРОООЧНО. Помогите решить 3 задание

Приложения:

Ответы

Ответ дал: Хехек
0
c:=0;
 while c<10 do
   ну и так далее
Вас заинтересует