Регистрация
ЮляЯяя1111
20.12.2022 12:42
Информатика
Есть ответ 👍

Ввести число. вычислить сумму первой и последней цифры. pascal цикл while или repeat

164
176
Посмотреть ответы 2

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

alyafalendysh
alyafalendysh
4,4(90 оценок)
Program n1; var sum, n: longint; begin sum: =0; write('введите число: '); readln(n); sum: =n mod 10; while n> 10 do n: =n div 10; sum: =sum+n; writeln('сумма 1 и последней цифр равна ',sum); end.
akoa
akoa
4,7(38 оценок)
A: =4; b: =4; b: =a/2*b; {b = 8} a: =2*a+3*b; {a=32}

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