Составьте программу, которая запоняет массив a[1… 10] случайными целыми числами в…

Question

82

Составьте программу, которая запоняет массив a[1… 10] случайными целыми числами в диапазоне от 1 до 10, затем преобразовывает его, возводя в квадрат всеэлементы с четными индексами. Pascal ABC

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

kechasug · Accepted Answer

55

kechasug

24 марта 2023

Uses crt; const n=10; var a: array[1… n] of integer; i: integer; beginrandomize; for i: =1 to n dobegina[i]: =random (10); write (a[i],'); end; writeln; for i: =1 to n dobegina[i]: =sqr (a[i]); write (a[i],'); end; end.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: