Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
совокупность знаков - символический метод записи чисел
var i,s: integer;
begin
writeln('summa ');
for i: =100 to 999 do
if i mod 17 =0 then s: =s+i else s: =s+0;
writeln(s)
end.
program;
var
max,val: integer;
label
start, ends;
max: =-50;
val: =50;
start:
if val> max then val: =val-10
if val=max then goto ends;
goto start;
ends:
Популярные вопросы