Question

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

Answer 1

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

Answer 2

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

Answer 3

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

Answer 4

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.

Answer 5

спасиибо