ПОМОГИТЕ ПОЖАЛУЙСТА! уровень 1 задачка 1

ПОМОГИТЕ ПОЖАЛУЙСТА! уровень 1 задачка 1

Задать свой вопрос
1 ответ
Var a,b,c: integer;
begin
write('a, b, c:');
readln(a,b,c);
writeln((a=b)and(a=c)and(b=c));
end.

Пример:
a, b, c:
5 8 6
False
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт