Регистрация
pvale4ka
17.10.2020 01:19
Информатика
Есть ответ 👍

Знайти суму і добуток цифр двозначного числа, яке вводить користувач. В программе Паскаль

296
319
Посмотреть ответы 2

Ответы на вопрос:

slon21
slon21
4,4(81 оценок)

var

 x, n, n1: integer;

begin

 Writeln('Введите число: ');

 Read(x);

 if (x > 9) and (x < 100) then

 begin

   n := (x div 10) + (x mod 10);

   n1 := (x div 10) * (x mod 10);

   Writeln('Sum:= ', n, ' Proizved:= ', n1);

 end;

end.

Маргарин11
Маргарин11
4,7(51 оценок)
Правильный ответ вариант а

Популярно: Информатика