Вариант 2; Задания а,б,в

0 голосов
31 просмотров

Вариант 2;
Задания а,б,в


image

Информатика (12 баллов) | 31 просмотров
Дан 1 ответ
0 голосов

Прога А на ABCPaskal^
Progaram sdaef;
var S, i: real;
label cikl;
S:=0;
i:=10;
if i>5 then begin
cikl:
S:=S+i;
i:= i-1
If i> 5 then goto cikl;
else
writeln (S);
end;
end.

(1.5k баллов)