Информатика | 5 - 9 классы
Нужно написать программу на pascal abc.
Добрый вечер, помогите мне?
Добрый вечер, помогите мне!
Нужно написать код для программы Pascal ABC, нужно написать код для решения этого уравнения.
Спасибо!
Нужно написать программу на pascal abc?
Нужно написать программу на pascal abc.
Написаиь программу на pascal ABC ;Из бюджета в 100 рублей нужно купить ручки стоимостью 34 рубля, программа должна вывести количество купленных ручек?
Написаиь программу на pascal ABC ;
Из бюджета в 100 рублей нужно купить ручки стоимостью 34 рубля, программа должна вывести количество купленных ручек.
Помогите, пожалуйста, нужны программы для Pascal ABC?
Помогите, пожалуйста, нужны программы для Pascal ABC.
Написать программу на языке Pascal (ABC)?
Написать программу на языке Pascal (ABC).
Номер 20.
2.
Нужно написать программу pascal abc?
Нужно написать программу pascal abc.
Помогите написать программу в Pascal abc?
Помогите написать программу в Pascal abc.
Написать программу на нахождение суммы отрицательных четных чисел на языке Pascal ABC?
Написать программу на нахождение суммы отрицательных четных чисел на языке Pascal ABC.
Написать программу вычисления pascal abc?
Написать программу вычисления pascal abc.
Написать программу вычисления Pascal abc?
Написать программу вычисления Pascal abc.
Перед вами страница с вопросом Нужно написать программу на pascal abc?, который относится к категории Информатика. Уровень сложности соответствует учебной программе для учащихся 5 - 9 классов. Здесь вы найдете не только правильный ответ, но и сможете ознакомиться с вариантами пользователей, а также обсудить тему и выбрать подходящую версию. Если среди найденных ответов не окажется варианта, полностью раскрывающего тему, воспользуйтесь «умным поиском», который откроет все похожие ответы, или создайте собственный вопрос, нажав кнопку в верхней части страницы.
/ / PascalABC.
NET 3.
2 сборка 1318
Var x1, y1, x2, y2, x, y, x3, y3, x4, y4 : integer ;
begin
read(x1, y1, x2, y2, x, y) ;
x3 : = x1 ;
y3 : = y2 ;
x4 : = x2 ;
y4 : = y1 ;
if (x< ; x1) and (y< ; = y3) and (y> ; = y1) then writeln('W') else
if (x< ; x1) and (y> ; y3) then writeln('NW') else
if (x> ; = x1) and (x< ; = x2) and (y> ; y3) then writeln('N') else
if (x> ; x2) and (y> ; y3) then writeln('NE') else
if (x> ; x2) and (y< ; = y2) and (y> ; = y4) then writeln('E') else
if (x> ; x2) and (y< ; y4) then writeln('SE') else
if (x< ; = x4) and (x> ; = x1) and (y< ; y4) then writeln('S') else
if (x< ; x1) and (y< ; y1) then writeln('SW') ;
end.
Пример ввода : - 2 1 4 4 - 3 5
Пример вывода :
NW.