Информатика, вопрос задал Аноним , 10 лет назад

Дана строка. Найти сумму записанных в строке чисел.

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

Ответил aynkova
0
var a:string;i,s:integer;
begin
read (a);
for i:=1 to length(s) do
begin
s:=s+i;
write (s);
end;
end.
Новые вопросы