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

Паскаль abc составьте программу которая проверяет равны ли 3 введённых числа и выводит на экран сообщения равны или не равны

Abdulla2009 Abdulla2009    1   24.08.2019 16:40    0

Ответы
FrostMorne FrostMorne  05.10.2020 17:00
Program n1;
var a,b,c: integer;
begin
readln(a,b,c);
if (a=b) and (a=c) and (b=c) then write('равны') else write('не равны');
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
nastyakarina112 nastyakarina112  02.03.2019 03:50
Найти все трёхзначные числа, которые при увеличении на 1 делятся на 2, при увеличении на 2 делятся на 3, при увеличении на 3, при увеличении на 3 делятся на 4, а при...
Zhekka123 Zhekka123  02.03.2019 03:50
Сосуды цилиндрической формы (их 6) заполнены до краев жидкостью плотностью d=1200 кг/м3 составьте программу, которая вычисляет суммарную массу жидкости требуемые исходные...
Hamidylla Hamidylla  02.03.2019 03:50
Сформувати одновимірний масив, в якому всі елементи з непарними номерами на 3 більше свого порядкового номера, а з парними на 3 менше свого порядкового номера...
никита3491 никита3491  14.11.2019 22:17
Записать составное высказывание «(3*3=12 и 3*3=9) или (6*6=36 и 5*5≠45)» в форме логического выражения. определить истинности или ложность получившегося выражения....
казан2 казан2  14.11.2019 22:16
Логическое выражение not(nota -- notb) v not(nota -- b) *...
rinatabd1 rinatabd1  14.11.2019 22:14
Определите тип файла по заданному расширению. укажите пример программного приложения, которое может быть использовано для работы с документами указанного типа. ответы...
отво отво  14.11.2019 22:12
Для каких имён истинно высказывание неправда, что в слове более 4 букв и первая буква – гласная и слово заканчивается на согласную.» 1 1 анна 2 василий 3 ирина 4 николай...
vadimmikrukov6p07zb1 vadimmikrukov6p07zb1  14.11.2019 22:10
F(a, b) = не a & не b v не a& b, если a=0, b=1f=a- не b v c ​...
Chamomilla1 Chamomilla1  24.06.2019 14:40
При перекодировании одной из пословиц из ascii в unicode её объём вырос на 28 байт. с какой из ниже пословиц такое могло произойти? у семи нянек дитя без глазу. смотрит...
karinroy karinroy  24.06.2019 14:40
Св pascal: заполнить значениями первые 50 элементов массива следующим образом: a [1]=1 a [2]=5 a [3]=9 a [4]=13 a [50]=x определите их сумму. выведите на экран значения...

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