найти сумму трехзначного числа . паскаль. найти через цикл ПОМОГИТЕ СРОЧНО, ПОЖАЛУЙСТА
Ответы на вопрос
Ответил semennovikov123
0
program nomer;
var
N:integer;
begin
writeln('vvedite chislo ');
readln(N);
N:=(N div 100)+((N div 10) mod 10)+(N mod 10);
writeln('summa 4ucel ravna: ',N);
writeln;
readln;
end.
Новые вопросы
Русский язык,
2 года назад
Английский язык,
2 года назад
Математика,
8 лет назад
Математика,
8 лет назад
Математика,
9 лет назад