Top.Mail.Ru
Ответы

Выдает ошибку     readln(s);  

Var s,t,A: integer;
begin
    readln(s);
    readln(t);
    readln(A);
    if (s > 10) or (t > A)
        then
writeln ('YES')
        else
writeln ('NO')
end.

По дате
По рейтингу
Аватар пользователя
Оракул
Аватар пользователя
Искусственный Интеллект

А что вы вводите после запуска первой строчкой?
Ожидается целое число от −32768 до 32767.

Аватар пользователя
Мудрец

Моя твоя пискаль не понимать он жопате говорит что нужно так

1234567891011121314
 var 
  s, t, A: integer; 
begin 
  s := 0; 
  t := 0; 
  A := 0; 
  readln(s); 
  readln(t); 
  readln(A); 
  if (s > 10) or (t > A) then 
    writeln('YES') 
  else 
    writeln('NO'); 
end.