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

  • дан массив из 8 элементов все его элементы увеличить в 2 раза

Ответы 1

  • var a:array [1..100] of real;i,n:integer;Begin    n:=8;    for i := 1 to n do begin        read(a[i]);        a[i]:= a[i]*2;

       end;    for i:= 1 to n do        write(a[i],'' );End.

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

Еще вопросы

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

Войти через Google

 или

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

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

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