Writeln(‘Maximalnoe chislo iz nih:’, max);
readln
END.
Если твой вопрос не раскрыт полностью, то попробуй воспользоваться поиском на сайте и найти другие ответы по предмету Информатика.
- 5 – 9 классы
- Информатика
- 5 баллов
составьте алгоритм нахождения наименьшего из трех значений в паскаль
- Попроси больше объяснений
- Следить
- Отметить нарушение
KarinaRainbow 15.11.2012
Что ты хочешь узнать?
Ответ
program p1;
var
a1, a2, a3, max: integer;
BEGIN
writeln (‘Vvedite 3 chisla cherez probel i nazhmite probel’);
readln (a1, a2, a3);
if a1>=a2 then
max:=a1
else
max:=a2;
if a3>max then
max:=a3;
Writeln(‘Maximalnoe chislo iz nih:’, max);
readln
END.
Ответ оставил Гуру
1 вариант:
a, b, c, min: integer;
if (a Оцени ответ
Если тебя не устраивает ответ или его нет, то попробуй воспользоваться поиском на сайте и найти похожие ответы по предмету Информатика.
“>