Вопрос по информатике:
Модифицируйте программу паскаля таким образом, чтобы она в случае ввода одинаковых чисел выдавала сообщение: "Числа равны!"
uses crt;/p>
var A,B:intege
- 09.03.2018 04:31
- Информатика
- remove_red_eye 762
- thumb_up 62
Ответы и объяснения 2
uses crt;
var A,B:integer;
begin TextColor(Blue);
writeln('<<>>' :50); writeln;
write('Первое число= ? ');
readln(A);
write('второе число= ? ');
readln(B);
write('Максимальное из двух чисел ');
if a b then
begin
if A>B then writeln(A)
else writeln(B);
end
else writeln ('числа равны');
end.
;- 09.03.2018 07:36
- thumb_up 46
uses crt;
var A,B:integer;
begin TextColor(Blue);
writeln('<<>>' :50); writeln;
write('Первое число= ? ');
readln(A);
write('второе число= ? ');
readln(B);
write('Максимальное из двух чисел ');
if A>B then writeln(A)
else
if B>A then writeln(B) else writeln('Числа равны!'); readln;
end.
;- 09.03.2018 08:21
- thumb_up 48
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.