Помогите пожалуйста составить программу (по Паскалю)
5-9 класс
|
даны целые числа а1....аN найти максимальное число.
begin
var n, i: integer;
var max, k: real;
write('N = ');
readln(n);
readln(max);
for i := 2 to n do
begin
readln(k);
if (k > max) then max := k;
end;
writeln('>', max);
end.
Другие вопросы из категории
Фрагмент 1 Для представления текстовой информации в компьютере используется алфавит мощностью 256 символов. Двоичный код каждого символа в компьютерном тексте занимает 1 байт памяти.
Фрагмент 2Таблица кодировки – это таблица, в которой всем символам компьютерного алфавита поставлены в соответствие порядковые номера и их двоичные коды.
Фрагмент 3Все символы кодировочной таблицы пронумерованы от 0 до 255. Каждому номеру соответствует двоичный код от 000000000 до 111111111. Для разных типов ЭВМ существуют разные таблицы кодировки. Для компьютеров типа IBM PC международным стандартом стала кодировочная таблица ASCII (American Standart Code for Information Interchange).
Фрагмент 4Первая половина этой таблицы имеет международный стандарт (символы от 0 до 127), вторая половина называется кодовой страницей и существует в различных вариантах.
Фрагмент 1 -
Фрагмент 2 -
Фрагмент 3 -
Фрагмент 4 -
1. Почему производители игр предпочитают получать деньги за счет донатов, а не за счет продажи игр? 2. Каким образом подростки платят донаты? 3. Почему донаты становятся более популярными? 4. Каким образом компьютерные игры вынуждают человека покупать донаты?
Умоляю помогите! у меня презентация по теме "ДОНАТ" надо подробно обо всём объяснить...
Читайте также
Клоун
предложил каждому из публики задумать число. Потом он сказал: «Прибавьте к
задуманному числу 5. Теперь из результата вычтите 2. А теперь к результату
прибавьте 7». Потом клоун спросил у желающих, какое число у каждого из них
получилось. Услышав ответ, он немедленно объявлял каждому, какое число тот
задумывал. Составьте программу, которая повторяла бы фокус клоуна.
Составьте программу, которая формирует массив из 40 случайных целых чисел от 0 до 20 и вычисляет:
1). сумму чисел, не превышающих 10;
2). сумму чисел,кратных 3. Помогите пожалуйста,написать эту программу на PaskalABC.
число отрицательное, то выведите сообщение, что значение у не существует.