Составить программу, которая из ряда целых двухзначных чисел рассчитывает сумму только тех чисел, цифры которых совпадают.
помогите пожалуйста!!)))
Ответы
Ответ дал:
0
var
i, s: integer;
begin
s := 0;
for i := 1 to 9 do s := s + 11 * i;
Writeln('Сумма 11+22+33+...+99=', s)
end.
Результат выполнения программы:
Сумма 11+22+33+...+99=495
i, s: integer;
begin
s := 0;
for i := 1 to 9 do s := s + 11 * i;
Writeln('Сумма 11+22+33+...+99=', s)
end.
Результат выполнения программы:
Сумма 11+22+33+...+99=495
Ответ дал:
0
Спасибо большое
Ответ дал:
0
Пожалуйста)
Похожие вопросы
2 года назад
7 лет назад
9 лет назад
9 лет назад
10 лет назад