Вводится n чисел. Найти наибольшее.(Паскаль АВС)
5-9 класс
|
Program MAX;
var
a:integer;{само проверяемое число}
m:integer;{максимально число}
begin
m:=0;{начальное значение максимального числа}
writeln('Введите ваше число:', '(Если захотите выйти, напишите ноль)':3);
readln(a);
while (a <> 0) then begin
If (a > m) then begin
m:= a; end;
readln(a); end;
writeln('Максимально число:', m:3);
End.
Другие вопросы из категории
сравнения чисел:10011_{2} и 19_{10}
101111_{2} и 43_{10}
47_{10} и 101110_{2}
записать ряд двоичных чисел от 1100,...до 10100
помогите пожалуйста!!
Найти сумму и количество чисел кратных 2, на промежутке от 2 до 15.
Я вообще не знаю как писать. Можете подробно все расписать по строкам, со всеми точками с запятой, я не знаю толком синтаксис паскаля. Чтобы я могла списать на см.
Заранее спасибо.
компания - поставщик офисного оборудования и программного обеспечения.Выберите её логотип:
а) Dell
б)Nokia
в)hp
г)IBM
десятичные цифры и все буквы латинского алфавита ( в латинском алфавите 26 букв, регистр букв не имеет значения).
Под хранение каждого такого пароля на компьютере отводится минимально возможное и одинаковое целое количество байтов, при этом используется произвольное кодирование и все символы кодируются одинаковым и минимально возможным количеством битов.
Определите объём памяти, который занимает хранение 100 паролей.
Читайте также
Задачи:
1.Ввести три целых числа, найти максимальное из них
2.Ввести пять целых чисел, найти максимальное из них
2. Дан массив целых чисел,найти количество отрицательных элементов массива.
3. Дан массив целых чисел,найти количество чётных чисел в массиве.
составе двухзначного
числа одинаковые цифры.
2)Вводятся 2 числа одного
ли они знака?
3)Вводиться двухзначное
число, посчитать
произведение чисел.
4)Принадлежит ли х
отрезку 1.5?
5)является ли ввод с
порядковым номером у
высокосным или нет
6)Вводиться 4 числа,
посчитать сумму
произведений
отрицательных чисел.
7)Вводиться 5 чисел найти
сумму чисел меньше 3, и
произведение чисел
больше 5.
8)Вводиться число
определить его знак.
9)Вводиться 6 чисел найти
сумму произведений тех
из них которые больше 10.