задача для решения в паскале:

найти максимальное из трех чисел.

дано: x, y, z

Question

Информатика

Светланка

8 сентября, 14:26

задача для решения в паскале:

найти максимальное из трех чисел.

дано: x, y, z

+5

Ответы (1)

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

Павел · Answer 1

program maks;

uses crt;

var x, y, z, max: real;

begin

clrscr;

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

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

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

if a>b then max:=a else max:=b;

if max
writeln ('Наибольшее из введенных чисел=', max) ;

repeat until keypressed;

end.

Вот так, это точно правильно, единственное, мог с пробелами накосячить, многое не помню.

задача для решения в паскале:найти максимальное из трех чисел.дано: x, y, z

задача для решения в паскале:

найти максимальное из трех чисел.

дано: x, y, z