Написать программу определяющую равны ли друг другу три введенные с клавиатуры числа
10-11 класс
|
var a,b,c:integer;
begin
writeln('Vvedite 3 chisla');
readln(a,b,c);
if (a=b) and (b=c) then write('Ravni') else write('Ne ravni');
end.
Другие вопросы из категории
8-битную кодировку КОИ-8. При этом информационное сообщение уменьшилось на 40 байт. Какова длина сообщения в символах?
1)5 2)20 3)40 4)320
Читайте также
текст.
3)Написать программу, которая определяет является ли слово палиндромом.
4)Написать программу, определяющую какая из букв а или о встречается в тексте первой.
Помогите хотябы одну пожалуйста))Нужно до завтра!))
2)Написать программу определяющую сумму всех нечетных чисел от 1 до 99
окружностей, образующих кольцо.
а) Написать программу, определяющую среднее арифметическое всех чисел от 0 до заданного пользователем.
б)Написать программу, определяющую количество четных чисел от 0 до заданного пользователем числа.