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

Pascal помогите!

5-9 класс

_______________________________

рассчитать сумму элементов массива, из 7 случайным образом заданных чисел,вывести на экран элементы массива и их суммы.
_______________________________
даю 40 баллов

Karenkar32 16 дек. 2016 г., 11:43:54 (7 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Kamaletdonovaasy1985
16 дек. 2016 г., 12:51:30 (7 лет назад)

var
  a: array [1..7] of integer;
  i, sum: integer;
begin
  sum := 0;
  for i := 1 to 7 do
   begin
    a[i] := random(101);
    writeln('A[', i, ']=', a[i]:3);
    sum := sum + a[i];
  end;
  writeln('Сумма элементов массива равна ', sum);
  readln
end.

Ответить

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

Помогите решить в паскале.Оценки, полученные спортсменом в соревнованиях по фигурному катанию (в баллах) хранятся в массиве из 18 элементов. В первых 6

-ти элементах записаны оценки по обязательной программе, с 7-го элемента по 12-ый записаны оценки по короткой программе, в остальных по произвольной программе. Выяснить, по какому виду программы спортсмен показал лучший результат. это одномерный массив

Помогите пожалуйста!!!!


Вы находитесь на странице вопроса "Pascal помогите!", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.