Предмет: Информатика,
автор: цикория1
С клавиатуры вводят целое число.Если оно положительное-увеличить его пять раз на два,иначе вывести сообщения ,что оно не положительное
Человек2к18:
Паскаль или Питон? Где программировать ?
Ответы
Автор ответа:
0
program ez;var x: integer;beginreadln(x);if x>0 thenbeginx:= x*(2*5);writeln(x);endelse writeln('Число отрицательно');end.
Это в Паскале.
Это в Паскале.
var x: integer;
begin
readln(x);
if x>0 then
begin
x:= x*(2*5);
writeln(x);
end
else writeln('Число отрицательно');
end.
Похожие вопросы
Предмет: Геометрия,
автор: Rosella0101
Предмет: Английский язык,
автор: Аноним
Предмет: Литература,
автор: fjjrhrbdbd
Предмет: Алгебра,
автор: макдак12121313
Предмет: Математика,
автор: FunnyCat118