Статистика
Всего в нашей базе более 4 327 664 вопросов и 6 445 978 ответов!

Составить алгоритмы и программы дляСоставить алгоритмы и программы для заполнения : Массива А (30) по формуле A(i) = 10*I + 2*i2.

5-9 класс

Найти среднее арифметическое элементов < 50. Распечатать массив в строку.
СОСТАВЬТЕ ПРОГРАММУ ПЛИЗ

Dashakorol200 31 июля 2015 г., 17:50:30 (8 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Arstist
31 июля 2015 г., 20:36:40 (8 лет назад)

Если я правильно понял условие, то код выглядит так.
uses crt;
var i,ans,sum:integer;
a:array[1..30] of integer;
begin
sum:=0;
ans:=0;
for i:=1 to 30 do
begin
a[i]:=10*i+2*sqr(i);
if a[i]<50 then
ans:=ans+1;
sum:=sum+a[i];
end;
writeln(sum/ans);
for i:=1 to 30 do
write(a[i],' ');

+ 0 -
Dsashaf
31 июля 2015 г., 21:43:38 (8 лет назад)

паскаль?

Ответить

Другие вопросы из категории

написать программу на языке паскаль (разветвляющийся алгоритм):

1) F=x2-3 (икс в квадрате минус три), x2=x*x (x в квадрате равен x умножить на x)
2) S=1/2ab (одна вторая а б)
3) С=a2-b2 (а в квадрате минус б в квадрате)

Дан массив 5x5 [-20,40] Используя QBasic, найти среднее арифметическое

элементов, оканчивающихся на 5.
Ребят, помогите, пожалуйста, желательно полностью написать весь алгоритм. Заранее спасибо!

Читайте также

Составить алгоритмы и программы для заполнения : Массива А (30) по формуле A(i) = 10*I + 2*i2.

Найти среднее арифметическое элементов < 50. Распечатать массив в строку.

1. Составьте программу ввода и вывода массива: 5, -2, 3, -6, 7, 9, -4, 8, 1, 2, 7, -3.

2. Составьте программу заполнения массива A(20) датчиком случайных чисел в диапазоне от -50 до 49 включительно.
3*. Составьте программу заполнения массива, не используя клавиатуру, числами: 1, 3, 5, 7, 9, 11, 13, 15, 17, 19.

Составьте программу в паскале со всеми строчками!!! Хозяин хочет оклеить обоями длинную стену в своем доме. Длина этой стены равна А метров, а

высота - В метров. Рулон обоев имеет длину 12 метров и ширину K см. Составьте алгоритм и программу, которая определит стоимость обоев для всей стены, если цена одного рулона C руб.



Вы находитесь на странице вопроса "Составить алгоритмы и программы дляСоставить алгоритмы и программы для заполнения : Массива А (30) по формуле A(i) = 10*I + 2*i2.", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.