написать программу, вычисляющую среднее арифметическое последовательности положительных чисел
5-9 класс
|
program qq;
var b,c,i,n,e: integer;
a:real;
begin;
b:= 0;
readln ( c,n);
for i:= c to n do
begin
b:= b+i;
end;
e:= (n-c) +1;
a:= b/e;
writeln (a);
end.
n и c это начало и конец промежутка ( например от 5 до 7)
последовательность ввоидтся с клавиатуры или есть какойто промежуток?
вывод на экран
Другие вопросы из категории
2. Дана фраза. Определить, сколько в ней предложений.
then if x<5 then F:=0
else F:=x*x
else F:=4+x
Чему равен R после выполнения следующих операторов?
R:= -10; 0; 5
if R<0 then R:=R*R;
if R=0 then R:=R+10;
if R>0 then R:=R-100;
Читайте также
положительных чисел, которые вводятся с клавиатуры. 2. Написать программу, которая определяет максимальное число из введенной с клавиатуры последовательности положительных чисел (длина последовательности неограниченна).
чисел, которые вводятся с клавиатуры
N, Написать ему выводящую на экран последовательность натуральность натуральных чисел отN до 1, номер 3 Даны натуральные числа N и К.Написать программу выводящую на экран последовательность из N чисел , каждое из которых равно К хотя бы что нибудь решите помогите очень надо!!!!!!!!!
на вход натуральные числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность).
2)Найти среднее арифметическое всех целых чисел от a до 200 (значения a и b вводятся с клавиатуры; a>=200);
2)Написать программу которая бы выводила на экран произведение нечетных чисел от 10 до 20.