artursaripov851
20.08.2020 20:04

40 люди добрые, с паскалем. нужно составить программы 1) дано число х. уменьшить его на 10, если число находится в интервале (10; 100]. увеличить его в 2 раза, если число меньше, уменьшить в 5 раз если больше. 2) дано натуральное число у. уменьшить его на 26, если число трехзначное. увеличить на 18, если число двузначное. 3) даны целочисленные координаты точки на плоскости. если точка совпадает с началом координат, то вывести 0. если точка не совпадает с началом координат, но лежит на оси ох или oy, то вывести соответственно 1 или 2. если точка не лежит на координатных осях, вывести номер координатного угла в римских числах. заранее огромное .

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
gazizkadyrzhan
06.10.2020 10:04
Program Evklid;
var M,N : integer;
begin
writeln (`Введите M и N`);
      readln (M , N);
      while M<>N do
              begin
                   if M>N
                   then M:=M-N
                   else N:=N-M
               end;
         write (`нод =`,M);
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота