Решите пожалуйста.........информатикаааааа
Решите пожалуйста.........информатикаааааа
Гость
Ответ(ы) на вопрос:
Гость Var a,b:integer;
begin
writeln('Введите 2 целых числа');
readln(a,b);
if (a>10) and (b>10) then writeln(a*b);
else writeln('Введены некорректные данные');
end.
Не нашли ответ?
Похожие вопросы