• Предмет: Информатика
  • Автор: Кристи123
  • Вопрос задан 9 лет назад
< >

Дано целое число. Напишите программу, которая уменьшает на 2 модуль этого числа и выводит на экран монитора результат.

 ПЛИИИИЗЗЗЗЗ.....HЕLP(((

Ответы

Ответ дал: Lockhart
0

uses crt;
var
n:integer;
BEGIN
read(n)
n:=abs(n)-2;
write(n);
END.

Ответ дал: ivanpakalnishkis
0

var

 n:integer;

begin

 readln(n);

 writeln(abs(n)-2);

end.

Похожие вопросы
Қазақ тiлi
1 год назад
помогите пожалуйста написать сочинение на тему: Менің досым на казахском языке
Английский язык
1 год назад
Grammar.помогите с английским языком.  задание:The children are sharing impressions about their school life.Fill in the gaps with the verbs in brackets in the correct tense form:Past Simple,Past
Алгебра
7 лет назад
x:703=64(остаток400) Уравнение с остатком. Буду благодарен тому кто решит.
Математика
7 лет назад
При каких а существует ровно одно х, удовлетворяющее равенству(а-2)x^2+x+2=0? СРООООЧНО
Математика
9 лет назад
за неделю было собрали 6500 кг винограда, их которых 650 кг передали в детский сад, а остальной виноград отправили в город в ящиках. сколько ящиков с виноградом отправили в город, если в каждом ящике
Математика
9 лет назад
за неделю было собрали 6500 кг винограда, их которых 650 кг передали в детский сад, а остальной виноград отправили в город в ящиках. сколько ящиков с виноградом отправили в город, если в каждом ящике
Математика
9 лет назад
Запишите частное в виде дроби и, если возможно, сократите её: а)-2:3 ; б)5:(-7) ; в)-3:(-8) ; г) -18:12 ; д)-12:(-36) ; е)-48:64 ; ж)45:(-75) ; з)-25:(-15) ; и)-100:(-200)
Математика
9 лет назад
в международном автопробеге учавствовало 350 машин. Экипаж каждой машины состоял из трёх спорцменов. До финиша не дошли 105 машин . Сколько машин и сколько спотцменов прибыли к фиинишу. зделай