Насколько я помню,операторы div и mod - операторы деления.mod - возвращает остаток от деления,а div - наоборот,целую часть.Алгоритм прост в данном случае: Пусть число abcd - заданное пользователем число.Тогда первая цифра будет равна : a = abcd div 1000 //a - число тысяч Вторая : b = (abcd - (a*1000)) div 100 //b - число сотен Третья : c = (abcd - (a*1000 + b*100)) div 10 // c - число десятков Четвертая : d = abcd mod 10 // d - остаток от деления,в данном случае число единиц. Остается только вывести a,b,c и d через пробел на экран.
var m: array[1..n] of integer; i, mn, mx: integer;
begin Write('Введите через пробел три целых числа: '); i := 1; repeat Read(m[i]); i := i + 1 until i > n; mn := m[1]; mx := mn; i := 2; repeat if mx < m[i] then mx := m[i] else if mn > m[i] then mn := m[i]; i := i + 1 until i > n; Writeln('Разность наибольшего с наименьшим равна ', mx - mn) end.
Тестовое решение:
Введите через пробел три целых числа: 7 9 3 Разность наибольшего с наименьшим равна 6
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку