Дано случайное число К Если оно положительное то уменьшить на 6.

Дано случайное число К Если оно положительное то уменьшить на 6. в противном случае прирастить на 10

Задать свой вопрос
1 ответ
Program primer1;
var k:integer;
begin
writeln('введите K');
readln(k);
If kgt;0 then k:= k-6 else k:= k+10;
write(k);
End.
Перехожев Егор
это если не учитывать 0. Если в условии его брать как положительное, то в 6 строке после знака> добавить( без пробелов) символ=
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт