В первом вложении приведена блок-схема по ГОСТ 19.701-90 (ISO 5807-85). СХЕМЫ АЛГОРИТМОВ, ПРОГРАММ, ДАННЫХ И СИСТЕМ. Обозначения условные и правила выполнения.
Алгоритм титрования на АЯ (Кумир) приведен во втором вложении.
1) 1 + 3 = 4 (2)
2) 4 * 2 = 8 (1)
3) 8 + 3 = 11 (2)
4) 11 * 2 = 22 (1)
5) 22 * 2 = 44 (1)
Ровно 5 команд.
Ответ: 21211
<span>по парам сравнить : сначала а и b затем c и d. потом наибольшие сравнить. использовать мах1 и мах2</span>
Задание 3
var
y, x: Real;
begin
Write ('Введите x: ');
ReadLn (x);
y := 3 / (x - 5);
WriteLn ('y = ' + FloatToStr (y));
end.
// ----------------------------------------------
Задание 4
var
y, x: Real;
begin
Write ('Введите x: ');
ReadLn (x);
if x < -1 then
y := 2 * x + 4
else if x > 3 then
Sqrt (x + 7)
else
y := 3 * x * x - x + 1;
WriteLn ('y = ' + FloatToStr (y));
end.
Вот полная
uses crt;
var
i,k:integer;
begin
for i:=100 to 999 do
if ((i+1) mod 2=0) and ((i+2) mod 3 =0) and ((i+3) mod 4=0) and ((i+4) mod 5 =0)
then begin
writeln(i);
k:=k+1;
end;
writeln('кол-во',k)
end.<span>
</span>