1. Информатика
  2. Решите в программе паскаль

Решите в программе паскаль эту . вводятся три целых числа. найти из них максимальное значение.

yaroslavpilip yaroslavpilip    2   12.07.2019 14:40    1

Ответы
вампир982 вампир982  18.09.2020 13:54
Например

var a,b,c,m: integer;
begin
read(a,b,c);
m := a;
if b > m then m := b;
if c > m then m := c;
write(m)
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
лоо25дллллл лоо25дллллл  19.04.2020 06:50
Вам дается натуральное число N. Узнайте, существует ли такое натуральное число K, что K×(K−1)/2=N.В единственной строке задается натуральное число N (1≤N≤10^9).Если существует...
anjellalove094 anjellalove094  19.04.2020 06:55
Вам дается число n, которое состоит из цифр 9 и 6. Вам нужно выбрать ровно одну цифру и перевернуть ее (если перевернут 9, то получится 6 и наоборот). Например, если n равно 96996...
yunis2007 yunis2007  19.04.2020 07:10
Составьте блок схему алгоритма, определяющего знак числа x. Найдите в ней вложенное ветвление. -Следование -Ветвление -Повторение...
nasty301 nasty301  19.04.2020 07:14
Дается три натуральных числа. Какие-то два из них равны, а третий нет. Найдите значение лишнего числа....
dimakrochak dimakrochak  27.07.2019 23:20
Массив состоит из 20 элементов. элементы могут принимать целые значения от -10000 до 10000 включительно. напишите алгоритм, позволяющий найти и вывести минимальный элемент массива,...
asikg27 asikg27  27.07.2019 23:20
Даны целое число n и массив чисел а1, а2, … аn. получить из массива а массив b, для которого b1=a1, bn= аn, а начиная со второго элемента bi=ai+аi+1. { int i, j; int n; cout vvedite...
Xbdjdndskej Xbdjdndskej  08.10.2019 19:10
Длина окружности с см. поместится ли шар с таким же радиусом в куб с ребром 6 см? сколько шаров поместиться? если с=36, 18, 9, 12, 6 см....
AnnKulibyakina AnnKulibyakina  08.10.2019 19:10
Дана таблица чисел, в этой таблице сложить числа в последней строке, ввод с клавиатуры, с++ ( размерность таблицы с клавиатуры,и цифры с клавиатуры) 4 5 6 7 0 0 0 0 1 2 0 -4 7...
DimanGuy32 DimanGuy32  08.10.2019 19:10
Скоро сдавать легкий вопрос ,но я не знаю как это правильно сделать! помгите необходимо вычислить в excel 891⋅43 . запись в ms excel выглядит следующим образом: +891+43 891×43...
Анастасия54546 Анастасия54546  08.10.2019 18:34
Переделать из pascal в c++ uses crt; var e,l,xk,yk,a,b,x: real; k: integer; function f(x: real): real; begin f: =sin(x)*x; //искомая функция end; begin l: =1; k: =0; //количество...

Популярные вопросы