ТутРешу.Ру

Сформируйте массив из 10 случайных целых чисел на промежутке [-7…

Задание:

Сформируйте массив из 10 случайных целых чисел на промежутке [-7,10] и увеличьте каждый элемент массива в 4

Решение:

Uses crt; const n=10; var a: array [1… n] of integer; i: integer; beginrandomize; for i: =1 to n dobegina[i]: =random (17) -7; writeln (a[i]); end; writeln; for i: =1 to n dobegina[i]: =a[i]*4; writeln (a[i]); end; end.




Знаете другой ответ?

Отправить свой ответ