есть числа x,y,z надо найти Min(x,y,z)
Ответы на вопрос
Ответил djamik123
0
Код на с++:....................................................................................................
Приложения:

Ответил Аноним
0
Программист, владеющий меньше чем пятеркой языков - любитель.
Ответил djamik123
0
вот именно )
Ответил Аноним
0
Но если Вы "в пятерке", и при этом не знаете Паскаль - это, простите, попросту смешно.
Ответил djamik123
0
ok you got it) i'm not gonna prove anything about this. )
Ответил Аноним
0
That's right ))
Ответил Аноним
0
var
x,y,z,min:integer;
begin
Write('Введите три целых числа: '); Readln(x,y,z);
if x<y then min:=x else min:=y;
if z<min then min:=z;
Writeln('Min=',min)
end.
Тестовое решение:
Введите три целых числа: 2 3 1
Min=1
x,y,z,min:integer;
begin
Write('Введите три целых числа: '); Readln(x,y,z);
if x<y then min:=x else min:=y;
if z<min then min:=z;
Writeln('Min=',min)
end.
Тестовое решение:
Введите три целых числа: 2 3 1
Min=1
Приложения:

Новые вопросы