Даны два целых числа а и b. Проверьте истинность высказывания "Справедливы неравенства а>2 и b≤3". Напишите программу
Answers & Comments
Shkolotyonok
Program da; var a,b:integer; begin write('Введите а:'); readln(a); write('Введите b:'); readln(b); if (a>2) and (b<=3) then writeln('Правда'); else write('Ложь') end.
Answers & Comments
var a,b:integer;
begin
write('Введите а:');
readln(a);
write('Введите b:');
readln(b);
if (a>2) and (b<=3) then
writeln('Правда');
else
write('Ложь')
end.