Какое служебное слово пропущено в алгоритме?
var i,s: integer;
______
s:=0;
for i:=1 to 100 do s:=s+i ;
writeln(s) ;
end.

Какое служебное слово пропущено в алгоритме?
var x,s:integer;
begin s:=0;
______ x:=1 to 5 do
begin
writeln(x);
s:=s+x end;
writeln(`s=`,s);
end.

Сколько раз выполнится тело цикла:
x:=1;
while x<4 do
begin
writeln(x);
x:=x+2;
end;

Выберите правильные утверждения. В результате выполнения данного алгоритма будет нарисовано...
program r;
uses graphabc;
var x,y,i:integer;
begin
setwindowsize (840,480); setwindowtitle (`****`);
setpencolor (clgreen); setpenwidth (4);
x:=50; y:=50;
for i:=1 to 8 do
begin rectangle(x,y,x+40,y+40);
x:=x+60;
end;
end.

Какая из следующих процедур предназначена для рисования окружности?

Сколько раз выполнится тело цикла?
for k:=2 to 5 do
x:=6;

Какое значение примет переменная х после выполнения фрагмента программы:
x:=1;
while x<10 do
x:=x+3;
x:=x+1;

Что выведется на экран после выполнения фрагмента программы:
s:=0;
for j:=10 to 15 do
s:=s+2*j;
writeln(s);

Что выведется на экран в результате выполнения фрагмента программы:
p:=1;
for k:=10 downto 7 do
p:=p+k*2;
write(p);

Определите значение переменной S после выполнения операторов:
i:=0;
S:=0;
repeat
i:=i+1;
S:=S+i*i;
until i>=3;