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

Nyashka12 Nyashka12    2   12.09.2019 14:20    5

Ответы
nikitaoksin201 nikitaoksin201  07.10.2020 09:49
Program primer1;
var k:integer;
begin
writeln('введите K');
readln(k);
If k>0 then k:= k-6 else k:= k+10;
write(k);
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика