Муниципальное автономное общеобразовательное учреждение города Новосибирска
Последовательное выполнение команд языка Паскаль вида:
a:=abs(-2)+trunc(1,6)*(6 mod 4):
b:=max(a mod 5, a div 3)* sgrt(a+5):
c:=int(a/4)+sgrt(b+4)sgrt(b-a)
определит значение
Фрагмент программы вида:
k:=1;
while (k<100) do k:=k+k;
white (k);
выведет значение k, равное:
Значение переменной s после выполнения фрагмента программы вида:
s:=0;
i:=1;
while (i<5) do
begin
i:=i+1;
s:=s+1
end;
будет равно ...
Фрагмент программы вида
m:=5;
p:=5:
for i:=1 to 3 do
if ((p<i) or (m<i) then p:=i else m:=i;
writeln (m, p);
3, 3
a='in';
b='out';
k:= length (b) - length (a);
for i:=1 to k do if (a[i]<b[i]) then k:=k+1;
write (k);
выведет на экран значение k, равное ...
Для a[i] = i, i = 1, 2, 3 фрагмент программы вида:
j:=1;
i:=3;
while (i>1) do
if (a[i]>a[j]) then j:=i;
i:=i-1;
write (i, j);
выведет на экран значения i и j в указанной последовательности:
y:=1;
while (j<3) do
y:=y*i;
j:=j+1
s:=s+y;
i:=i-1
write (s, y);
выведет на экран последовательно следующие значения переменных s и y :
Фрагмент программы виды:
f:=1;
while (k,6) do
f:=f*k;
k:=k+2
write (f, k);
выведет на экран пару чисел в следующей последовательности:
x:=4;
j:=3;
while (x mod j>0) do
j:=j-1;
write (i+j);
выдаст на экран число, равное...