Составьте блок-схемы и программы для решения следующих задач.

Для четырех произвольных чисел, введенных с клавиатуры, выведите на экран соответствующие результаты.

· Если разность первого и последнего, превышает второе, то выведите второе число.

· Если сумма второго и третьего меньше четвертого числа, то выведите эту сумму.

· Если выполняются одновременно два перечисленных выше условия, то выведите второе число и сумму второго и третьего чисел.

· Иначе, выведите все четыре числа без изменения.

Question

Информатика

Нонюся

23 февраля, 14:22

Составьте блок-схемы и программы для решения следующих задач.

Для четырех произвольных чисел, введенных с клавиатуры, выведите на экран соответствующие результаты.

· Если разность первого и последнего, превышает второе, то выведите второе число.

· Если сумма второго и третьего меньше четвертого числа, то выведите эту сумму.

· Если выполняются одновременно два перечисленных выше условия, то выведите второе число и сумму второго и третьего чисел.

· Иначе, выведите все четыре числа без изменения.

+5

Ответы (1)

Знаете ответ на вопрос?

Александрин · Answer 1

Если смотреть с точки зрения Паскаля, то получается такая ересь:

var

x, z, c, y:real;

begin

writeln ('введите первое число') ; readln (x) ;

writeln ('введите второе число') ; readln (z) ;

...

Q:=x-y; (разность первого и последнего числа) ;

W:=z+c; (сумма второго и третьего числа) ;

В случае если выполняются эти два условия

if Q > z then

if W < y then

begin

writeln (W) ;

writeln (z) ;

end

else

if Q > z then writeln (z)

else

if W < y then writeln (W) ;

end.