
Вавила
6 год назад
Пожалуйста посчитайте ПОЖАЛУЙСТА!уровень 1 Задание 1

ОТВЕТЫ

Димитър
Oct 24, 2020
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
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
781
Смежные вопросы: