С клавиатуры вводят целое число.Если оно положительное-прирастить его 5 раз на

С клавиатуры вводят целое число.Если оно положительное-прирастить его 5 раз на два,по другому вывести извещенья ,что оно не положительное

Задать свой вопрос
Дячко Инна
Паскаль либо Питон? Где программировать ?
1 ответ
Program ez;var x: integer;beginreadln(x);if xgt;0 thenbeginx:= x*(2*5);writeln(x);endelse writeln('Число негативно');end.




Это в Паскале. 
Турутаев Даниил
var x: integer;
Ирина Дайри
begin
Tatjana Rovchan
readln(x);
Инна Гайдуллина
if x>0 then
Степа
begin
Тамара
x:= x*(2*5);
Korchmarev Vadim
writeln(x);
Инна Густынова
end
Кирилл Стольцер
else writeln('Число негативно');
Amelija Sajgushinskaja
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт