Определите значение целочисленных переменной "а" после выполнения фрагмента программы. (укажите только число)
a:=1686
b:=(a div 10) mod 5;
a:= a-200*b
Определите значение целочисленных переменной "а" после выполнения фрагмента программы. (укажите только число)
a:=2468;
b:=(a mod 1000)*10;
a:= a div 1000+b;
Определите значение целочисленных переменной "b" после выполнения фрагмента программы. (укажите только число)
a:=3+8*4;
b:=(a div 10)+14;
a:= (b mod 10) +2;
Определите значение целочисленных переменной "а" после выполнения фрагмента программы. (укажите только число)
a:=6*12+3;
b:=(a div 10)+5;
a:=(b mod 10)+1;
Определите значение целочисленных переменной "y" после выполнения фрагмента программы. (укажите только число)
x:=336
y:= 8;
x:= x div y;
y:=x mod y;
Определите значение целочисленных переменной "y" после выполнения фрагмента программы. (укажите только число)
x:=5;
y:=7;
t:=x;
x:=y mod x;
y:=t;
Определите значение целочисленных переменной "y" после выполнения фрагмента программы. (укажите только число)
x:=19;
y:=3;
z:=y*2
y:=x mod y;
x:=x-z;
y:=y+z;
Определите значение целочисленных переменной "а" после выполнения фрагмента программы. (укажите только число)
a:=42;
b:=14;
a:= a div b;
b:= a*b;
a:= b div a;
Определите значение целочисленных переменной "b" после выполнения фрагмента программы. (укажите только число)
a:=1819;
b:= (a div 100)*10+9;
a:= (10*b-a) mod 100;
Линейный алгоритм подразумевает:
A - Последовательное выполнение всех элементов программы
Б - Верного ответа нет
В - Выполнение лишь нескольких, удовлетворяющих заданному условию частей программы
Г - Неоднократное повторение отдельных частей программы
например алгоритм заварки чая:
вскипятить воду ополоснуть кипятком заварной чайник засыпать в чайник заварку залить кипятком заварной чайник накрыть чайник специальной грелкой подождать до полного заваривания 5 минутVAR a,b,c,d:REAL;
PROCEDURE Print_S(x,y,z:REAL);
VAR p,S:REAL;
begin If ((x+y)>z) and ((x+z)>y) and ((y+z)>x) then
begin
p:=x+y+z;
S:=SQRT(p*(p-x)*(p-y)*(p-z));
WriteLn('S= ',S);
end
else
Writeln('Треугольник не существует!');
end;
BEGIN Write('a= ');
ReadLn(a);
Write('b= ');
ReadLn(b);
Write('c= ');
ReadLn(c);
Write('d= ');
ReadLn(d);
WriteLn;
WriteLn('Стороны ',a,'; ',b,'; ',c);
Print_S(a,b,c);
WriteLn;
WriteLn('Стороны ',a,'; ',b,'; ',d);
Print_S(a,b,d);
WriteLn;
WriteLn('Стороны ',a,'; ',c,'; ',d);
Print_S(a,c,d);
WriteLn;
WriteLn('Стороны ',b,'; ',c,'; ',d);
Print_S(b,c,d);
END.