Нужно написать программу на языке паскаль. дан массив действительных чисел среди них есть равные. найти первый максимальный и заменить его нулём

185

301

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

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

УмнаяВыхухоль

Информатика

4,7(55 оценок)

Pascalabc.net 3.4.2, сборка 1837 от 11.10.2018 внимание! если программа не работает, обновите версию!

begin

var a : = readarrreal(readinteger('n='));

a[a.indexmax] : = 0;

a.println

end.

n= 10 -14.75 -62.2 20.7 53.01 -28.25 18.04 29.35 -29.21 53.01 -63.53 -14.75 -62.2 20.7 0 -28.25 18.04 29.35 -29.21 53.01 -63.53

cyganka84

Информатика

4,5(91 оценок)

Если основание системы счисления Р < 10, то для символьного представления цифр в ней, как правило используют первые Р десятичных цифр (от 0 до Р - 1).

Для 10 < Р < 37 в качестве первых десяти цифр обычно используют их десятичное представление, а для остальных цифр — буквы латинского алфавита.

Для систем счисления с основаниями, большими 36, единых правил для формы записи цифр не существует.