Информатика, опубликовано 2018-08-22 22:43:21 by Гость
Дано целое число .Если оно является положительным,то умножить его на 3;в противном случае не изменять его.Вывести полученное число.
Ответ оставил Гость
Uses crt;
var n:integer;
begin
clrscr;
write(n = ); readln(n);
if(n>=0) then n:=n*3;
writeln(n);
readln
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.