Помогите решить задачки PascalABC.

Помогите решить задачки PascalABC.

Задать свой вопрос
1 ответ

1.

var

   a, b : integer;

begin

   write('введите два числа: ');

   readln(a, b);

   if (абс(a) gt; 10) and (абс(b) gt; 10) then writeln(a+b) else writeln(a*b);

end.

2... много задач...

Таисия Кожурина
спасибо
Денис Кончица
можете посодействовать
Илья Мигута
Ingr
Леня Карабихин
очень надо прошу
Мавран Данил
Дано пятизначное число наименьшее 32000. Отыскать сумму первых трех цифр и сумму вторых цифр. ( число 12345, 1+2+3 и 3+4+5).
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт