Предмет:
Другие предметыАвтор:
анонимvar a,b : integer; // объявление переменныхbegin write(\'Введите два целых числа: \'); // вывод на экран текстовой строки readln(a,b); // считываем значение переменных, введенных с клавиатуры if (a = b) then // выполняется если введенные числа равны writeln(\'Число \', a, \' равно числу \', b) // вывод на экран текстовой строки else // выполняется если числа не равны begin if (a > b) then // выполняется если а > b writeln(\'Число \', a, \' больше числа \', b) // вывод на экран текстовой строки else // выполняется если а < b writeln(\'Число \', a, \' меньше числа \', b) // вывод на экран текстовой строки endend.
Автор:
marielaДобавить свой ответ
Предмет:
Другие предметыАвтор:
анонимОтветов:
Смотреть
Предмет:
Другие предметыАвтор:
анонимОтветов:
Смотреть
Предмет:
Другие предметыАвтор:
анонимОтветов:
Смотреть
Предмет:
Другие предметыАвтор:
анонимОтветов:
Смотреть