напишите программу на языке Паскаль.
Условие:
Напишите программу,которая вводит с клавиатуры три целых числа и вводит их в логическую переменную значения True,если все эти числа двузначные

Anastasia20181 Anastasia20181    1   22.04.2020 19:22    2

Ответы
fsjxjnlsjaCn fsjxjnlsjaCn  13.10.2020 17:09

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.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика