Будь-ласка, допоможіть вирішати задачу за паскальом

Ответить

Код подтверждения
Введите код в точности так, как вы его видите. Регистр символов не имеет значения.

BBCode ВКЛЮЧЁН
[img] ВКЛЮЧЁН
[url] ВКЛЮЧЁН
Смайлики ОТКЛЮЧЕНЫ

Обзор темы
   

Развернуть Обзор темы: Будь-ласка, допоможіть вирішати задачу за паскальом

Re: Будь-ласка, допоможіть вирішати задачу за паскальом

Хыиуду » 20 ноя 2013, 14:48

tmp1:= x div 100;
tmp2:= x mod 100;
if tmp1 div 10 + tmp1 mod 10 = tmp2 div 10 + tmp2 mod 10
then writeln('Та');
else writeln('Нi');

Будь-ласка, допоможіть вирішати задачу за паскальом

Наталія01 » 19 ноя 2013, 18:50

Завдання.
Визначити чи дорівнює сума двох перших цифр заданого чотиризначного числа сумі двох його останніх сторін.

Вернуться к началу