Вопрос по информатике:
ПОМОГИТЕ ПОЖАЛУЙСТА СРОЧНО ЗАДАЧИ ПО ПАСКАЛЮ, НАПИШИТЕ РЕШЕНИЕ УМОЛЯЮ!!!)))
1.Даны два числа. Определить,какое из них больше. Вывести знак ">" если первое число больше,или знак"<" в противном случае.
2.Проверить,является ли заданное целое число чётным. Вывести " YES " если число чётное, и "NO" в противном случае.
- 23.05.2018 01:10
- Информатика
- remove_red_eye 9320
- thumb_up 23
Ответы и объяснения 1
1)
var a,b:real;
begin
writeln ('Введите 2 числа');
readln(a,b);
if a>b then writeln('>')
else writeln('<');
end.
2)
var x:integer;
begin
writeln('Vvedite chislo');
readln(x);
if (xmod2=0) then writeln('Yes')
else writeln('No');
end.
- 24.05.2018 17:41
- thumb_up 8
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.