СРОЧНО!!!! напишите программу на языке Паскаль.
Условие:
Напишите программу,которая вводит с клавиатуры три целых числа и вводит их в логическую переменную значения True,если все эти числа двузначные
Условие:
Напишите программу,которая вводит с клавиатуры три целых числа и вводит их в логическую переменную значения True,если все эти числа двузначные
More Questions From This User See All
Answers & Comments
Ответ:
program z1;
var a,b,c:integer;
o:boolean;
begin
write ('a = ');
readln (a);
write ('b = ');
readln (b);
write ('c = ');
readln (c);
o:=(a>9) and (a<100) and (b>9) and (b<100) and (c>9) and (c<100);
writeln (o)
end.