1 задача. var a, b, c: integer; begin write('Введите через пробел три числа: '); readln(a, b, c); if (a > b) then if (b > c) then write('Сумма двух наибольших чисел: ', a + b) else write('Сумма двух наибольших чисел: ', a + c) else if (c > a) then write('Сумма двух наибольших чисел: ', c + b) else write('Сумма двух наибольших чисел: ', b + a) end.
2 задача. var x, f: real; begin write('Введите значение x: '); readln(x); if (x > 0) then f := (2 - x) / (x * x) else f := 6 - (x * x * x); writeln('Значение функции при данном x: ', f) end.
3 задача. var a, b: integer; write('Введите через пробел два числа: '); readln(a, b); writeln('Сумма чисел: ', a + b); writeln('Разность чисел: ', a - b); writeln('Произведение чисел: ', a * b) end.
Алгоритм- последовательность действий, приводящая к цели. Пример: 1.Взять банан. 2.Очистить его от кожуры. 3.Съесть банан. 4.Выкинуть кожуру. Блок схема- графическое представление определения, анализа или метода решения задачи, в котором используются символы для отображения данных, потока, оборудования и т. д. Для ввода и вывода данных используют ПАРАЛЛЕЛОГРАММ. Для начала и конца выполнения алгоритма используется ПРЯМОУГОЛЬНИК С ОКРУГЛЕННЫМИ КРАЯМИ. Для обработки данных алгоритма используется ПРЯМОУГОЛЬНИК. Для проверки условия используется РОМБ. Что такое чертёжник я не знаю. "Человек разрабатывает алгоритмы" - истинное высказывание.
var a, b, c: integer;
begin
write('Введите через пробел три числа: ');
readln(a, b, c);
if (a > b) then
if (b > c) then
write('Сумма двух наибольших чисел: ', a + b)
else
write('Сумма двух наибольших чисел: ', a + c)
else
if (c > a) then
write('Сумма двух наибольших чисел: ', c + b)
else
write('Сумма двух наибольших чисел: ', b + a)
end.
2 задача.
var x, f: real;
begin
write('Введите значение x: ');
readln(x);
if (x > 0) then
f := (2 - x) / (x * x)
else
f := 6 - (x * x * x);
writeln('Значение функции при данном x: ', f)
end.
3 задача.
var a, b: integer;
write('Введите через пробел два числа: ');
readln(a, b);
writeln('Сумма чисел: ', a + b);
writeln('Разность чисел: ', a - b);
writeln('Произведение чисел: ', a * b)
end.