Информатика, опубликовано 2018-08-22 20:29:39 by Гость
ABC pascal заданы 2 натуральные числа является ли первое число двухзначным а второе однозначным
Ответ оставил Гость
Program Project2;
{$APPTYPE CONSOLE}
uses SysUtils;
var a,b:integer;
begin
readln(a,b);
if (a div 10 =0) and (b div 1000=0) then
writeln(True);
readln;
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.