Засунь данное условие в Paskal и он выдаст тебе ответ.
Ответ:5430
Первый 1111111
второй 92
третий 10766
четвертый 1470
Как правельно сделать я незнаю
вот подсказка
Var
A:integer;
Begin
WriteLn('Введите трёхзначное число');
ReadLn(A);
WriteLn((A div 100)+(A mod 10))
End.
Program summa;
var i,n:integer;
begin
for i:=10 to 15 do
n:=n+i;
writeln('Summa 4isel ot 10 do 15= ',n);
end.<span>
</span>