Ввести с клавиатуры три числа a,b,c. проверить,являются ли упорядоченными,то есть a＜b＜c...

Question

Ввести с клавиатуры три числа a,b,c.
проверить,являются ли упорядоченными,то есть a＜b＜c
ПОМОГИТЕ ПОЖАЛУЙСТАвообще не шарю

Answer 1

*могу писать с ошибками, давно паскаль изучал, но суть верна
begin
var a,b,c:integer;
Read(a);
Read(b);
Read(c);
if ((awriteln("Введено верно!");
else 
writeln("Введено неверно!");
end.

Comments

Для понимая можно написать не read, a readln. Так красивее и нагляднее. Все им вроде и пользуются

---

И слово begin пишется перед read(a); Попутал чуток

Answer 2

Pascal
Program system
Var a, b, c : real;
Begin
Readln(a, b, c);
If (a < b) and (b < c) then
Writeln( ‘YES’ )
Else writeln( ‘NO’ );
End.

Comments

спасиибо