Напишите программу,которая принимает с клавиатуры число и превращает его в положительное,если оно отрицательное,либо в ноль во всех остальных случаях.
danypapajoy8eeo
2
18.05.2019 06:40
0
Другие вопросы по теме Информатика
katyspdhh
15.06.2019 06:50
magasadrudinov
28.03.2020 14:04
Margarita0912177
28.03.2020 14:04
Aminka26
16.04.2019 23:07
aidana013
07.10.2019 13:02
AnnyMay2629
19.04.2019 11:57
kotiki2017
19.04.2019 11:43
Популярные вопросы
- Найдите производную функции 3) f(x)=tg^-5 степени (-x) 5) f(x) =arcsin2x 7)...
1 - Оксид углерода(IV) реагирует с веществами: Ca(OH)2 HNO3 CaO CaCl2...
3 - Перечислите динамические элементы видеоряда....
3 - (645+567+867)c-659a не в упрощённом ...
2 - 2.Как звали князя, который после смерти князя Андрея получил в Орде законное...
2 - Випишіть складні прикметники і відповідні їм словосполучення у три колонки:...
2 - Помагите Антоним к слову грустим...
2 - План габдулла тукай 6 класс надо...
1 - Какое спряжение в словах : Считается защитишь скажешь , поступишь....
1 - ВО Почему племенам гуннов необходимо было объединиться? 2. В чём историческая...
1
var a:integer;
begin
readln(a);
if (a<0) then a:=a*(-1) else a:=0;
writeln(a);
end.
Program zadacha;
var x:integer;
Begin
readln(x);
if (x<0) then a:=abs(x)
else a:=0;
writeln(x);
end.