Есть ответ 👍

Задайте массив из 10 элементов с датчика случайных чисел. замените всё его положительные элементы на наибольший отрицательный элемент. выведите на экран исходный и полученный массив. на паскале

278
466
Посмотреть ответы 2

Ответы на вопрос:

Ната70
4,6(37 оценок)

uses crt; var min,i: integer; a: array[1..10] of integer;

begin randomize; for i: =1 to 10 do a[i]: =random(91)-40; for i: =1 to 10 do write(a[i],' '); min: =a[1]; for i: =1 to 10 do if min > a[i] then min: =a[i]; for i: =1 to 10 do if a[i]> 0 then a[i]: =min; writeln; for i: =1 to 10 do write(a[i],' ');

readln; end.


Flag = 15

choice = int(input("3*5="))

if Flag == choice:

  print("Верно")

else:

  print("Не верно")

Популярно: Информатика