Предмет: Информатика,
автор: olgafrolowa5
дано целое число .Если оно является положительным,то умножить его на 3;в противном случае не изменять его.Вывести полученное число.
Ответы
Автор ответа:
0
uses crt;
var n:integer;
begin
clrscr;
write('n = '); readln(n);
if(n>=0) then n:=n*3;
writeln(n);
readln
end.
var n:integer;
begin
clrscr;
write('n = '); readln(n);
if(n>=0) then n:=n*3;
writeln(n);
readln
end.
Интересные вопросы
Предмет: Английский язык,
автор: kaakbota09
Предмет: Геометрия,
автор: alimlyushanlo64
Предмет: Математика,
автор: annakoks0599
Предмет: Математика,
автор: cvetoknatasha
Предмет: Геометрия,
автор: lis7974065