Запишите на языке Паскаль программу решения задачи условие дано целое трехзначное число Составьте программу которая вычисляет

Question

Информатика: Запишите на языке Паскаль программу решения задачи условие дано целое трехзначное число Составьте программу которая вычисляет сумму цифр этого числа​

VladGulevevatiy · Answer

Var sum, a, a1, a2, a3:integer;BeginWriteln( Введите трехзначное число );Readln(a);a1:=a div 100 ;a2:=(a div 10) mod 10 ;a3:=a mod 10;sum:=a1+a2+a3;Writeln(sum);End....

Запишите на языке Паскаль программу решения задачи условие дано целое трехзначное число Составьте программу которая вычисляет сумму цифр этого числа​

Популярные вопросы

Запишите на языке Паскаль программу решения задачи условие дано целое трехзначное число Составьте программу которая вычисляет сумму цифр этого числа