написать программу Паскаль Задана арифметическая прогрессия 2; 2.8 ... . сколько членов прогрессии нужно сложить чтобы полученная сумма стала больше 20
Ответы
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Напишите название пиктограмм что они означаютэто Сочи по информатике
Автор: Екатерина15
Як вставити звуковий файл для презинтації
Автор: universal21vek116
var x,s,k:real;
begin
x:=2;
While s<=20 do
begin
s:=s+x;
k:=k+1;
x:=x+0.8;
end;
write(k);
end.
Объяснение: