массив из 15 частей из промежутка от -10до10 вывести в строчку.

Массив из 15 элементов из интервала от -10до10 вывести в строчку. на куб этого числа,вывести повторно.

Задать свой вопрос
1 ответ
Вот не уверенна, что правильно Program A1;
Uses crt;
Var A: array [1..15] of integer;
i: integer;
Begin clrscr;
for i:=1 to 15 do
begin
a[i]:= random (10-(-10)+1)+(-10);
write (a[i],' ');
end;
writeln;
for i:=1 to 15 do
begin
if i mod 2=0 then a[i]:=5;
end;
for i:=1 to 15 do
write a[i].' ');
readln;
readkey;
end.
Shurykmna Daniil
спасибо
Явко Стефания
пожалуйста
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

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

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт