Написать программу которая...

Валера! · 15 фев 2010

Написать программу которая найдет сумму цифр введенного с клавиатуры трехзначного натурального числаN

Meily · 15 фев 2010

program Sum;
var
a,b,c,s: integer;
begin
WriteLn('Введите числа а,в,с');
ReadLn(a,b,c);
s:=a+b+c;
WriteLn('Сумма чисел равна',s);
end.