Вопрос по информатике:
40 БАЛЛОВ
Люди добрые, помогите пожалуйста с Паскалем.
Нужно составить программы
1) Дано число х. Уменьшить его на 10, если число находится в интервале (10;100]. Увеличить его в 2 раза, если число меньше, уменьшить в 5 раз если больше.
2) Дано натуральное число у. Уменьшить его на 26, если число трехзначное. Увеличить на 18, если число двузначное.
3) Даны целочисленные координаты точки на плоскости.
Если точка совпадает с началом координат, то вывести 0.
Если точка не совпадает с началом координат, но лежит на оси ОХ или OY,
то вывести соответственно 1 или 2.
Если точка не лежит на координатных осях, вывести номер координатного угла в римских числах.
Заранее огромное спасибо.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 15.11.2017 07:57
- Информатика
- remove_red_eye 2204
- thumb_up 33
Ответы и объяснения 1
var M,N : integer;
begin
writeln (`Введите M и N`);
readln (M , N);
while MN do
begin
if M>N
then M:=M-N
else N:=N-M
end;
write (`нод =`,M);
end.
- 16.11.2017 09:27
- thumb_up 18
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.