Составить блок схему: var a,b,c: integer; Begin read (a,b,c); if

76

Составить блок схему: var a,b,c: integer; Begin read (a,b,c); if (a>b) then a: =a else a: =b; if (a>c) then a: =a else a: =c; writeln (a); End.

категория: информатика

ответить

в избранное

86

sabonis

22 февраля 2023

A=a — это глупость.if not (a>b) then a: =b; <-так правильнее.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Знаете другой ответ?

Задайте свой вопрос

Смотрите также:

Построить в паскале оси координат

Яд находится в одном из 16 бокалов. Сколько единиц информации будет содержать сообщение о бокале сядом?

Какая из перечисленных клавишь QWERTY — клавиатуры не является парной?

Каково наибольшее целое число X, при котором истинно высказывание 10< X*X*X) => (20> (X+1) (X+1)

На рисунки изображены колеса: от машины, велосипеда и телеги. Задание рассмотреть рисунки и заполнитьтаблицу

Помогите с информатикой плизз 108 байт=… Кб … байт 2040 Мб=… Гб 107 Кб=… бит______________________20 баллов за ответ

Составьте программу находящую значение функции y=2x+3 области целыхх чисел

Правила редактирования документа WORD

Сравнительные преимущества и недостатки магнитных и оптических носителей

27400

14822

Английский язык

14216

Биология

7369

720

Экономика

18829

8304

География

15850

Геометрия

5255

Информатика

11818

23332

15992

Литература

73118

Математика

8152

Обществознание

466

Правоведение

46271

Русский язык

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!

Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!

Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...