Задать вопрос Регистрация
Помочь другим

  • помогите пожалуйста составить программу!!! Задан массив из натуральных чисел размером 30 элементов.Напишите программу получения из него другого массива который будет содержать кубы значений.

Ответы 2

  • program AA;

    arr1,arr2 : array [ 0..29] of integer;

    i:integer

    begin  

      for i:=0 to 29 do 

      begin

         readln(arr1[i]);

         arr2[i] := arr1[i] * arr1[i] ;

       end;

     

     for i:=0 to 29 do 

         writeln(arr2[i])

    end.

    • Автор:

      araceli
    • 6 лет назад
    • 0

  • vara: array [1..30] of integer;i:integer;beginfor i:=1 to 30 doreadln(a[i]55);for i:=1 to 30 doa[i]:=a[i]*a[i]*a[i];for i:=1 to 30 dowrite(a[i], ' ');end.

  • Добавить свой ответ

Еще вопросы

Топ пользователей

Войти через Google

 или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years