Вопросы и ответы
Топ за год Облако тегов  

помогите с массивами(паскаль)

программирование обучение информатика паскаль массивы

Окси©, 461 просмотр
0
1)заполнить таблицу 10 случайными числами и вывести ее на экран в обратном порядке
2)заполнить таблицу 10 случайными числами и вычислить сумму ее элементов
Ответы:
interacia
program googl15;
var
i:integer;
Sum:integer;
a: array [1..10] of integer;
begin
for i:=1 to 10 do
 begin
 a[i]:=random(100);
 Sum:=sum+a[i];
 end;
for i:=10 downto 1 do write(' ',a[i]);
writeln;
writeln('Сумма массива = ',Sum);
end.


12 лет назад

RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.

Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.

Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.