Предмет: Информатика, автор: цикория1

С клавиатуры вводят целое число.Если оно положительное-увеличить его пять раз на два,иначе вывести сообщения ,что оно не положительное


Человек2к18: Паскаль или Питон? Где программировать ?

Ответы

Автор ответа: Человек2к18
0
program ez;var x: integer;beginreadln(x);if x>0 thenbeginx:= x*(2*5);writeln(x);endelse writeln('Число отрицательно');end.




Это в Паскале. 

Человек2к18: var x: integer;
Человек2к18: begin
Человек2к18: readln(x);
Человек2к18: if x>0 then
Человек2к18: begin
Человек2к18: x:= x*(2*5);
Человек2к18: writeln(x);
Человек2к18: end
Человек2к18: else writeln('Число отрицательно');
Человек2к18: end.
Похожие вопросы