Предмет: Информатика,
автор: kalinovskaya001
В "Кумир". 8 класс
1) Ввести число. Если оно больше 10, разделить его на 2, если меньше или равно 10, то умножить на 5.
2) Ввести два числа . Если их сумма больше 100, то сумму уменьшить в 2 раза, в противном случае увеличить в 2 раза
Ответы
Автор ответа:
1
1)var
n:real;
begin
readln(n);
if n>10 then
n:=n/2
else
n:=n*5;
writeln(n);
end.
2) var
a, b: integer;
begin
writeln('Введите два числа: ');
read(a, b);
if a + b > 100 then writeln((a + b) / 2)
else writeln((a + b) * 2);
end.
n:real;
begin
readln(n);
if n>10 then
n:=n/2
else
n:=n*5;
writeln(n);
end.
2) var
a, b: integer;
begin
writeln('Введите два числа: ');
read(a, b);
if a + b > 100 then writeln((a + b) / 2)
else writeln((a + b) * 2);
end.
Автор ответа:
1
№1
алг
нач
вещ a
ввод a
если a>10 то a:=a/2 иначе a:=a*5 все
вывод a
кон
№2
алг
нач
вещ a,b,sum
ввод a,b
sum:=a+b
если sum>100 то sum:=sum/2 иначе sum:=sum*2 все
вывод sum
кон
алг
нач
вещ a
ввод a
если a>10 то a:=a/2 иначе a:=a*5 все
вывод a
кон
№2
алг
нач
вещ a,b,sum
ввод a,b
sum:=a+b
если sum>100 то sum:=sum/2 иначе sum:=sum*2 все
вывод sum
кон
Похожие вопросы
Предмет: Английский язык,
автор: ekaterinavdovenko201
Предмет: Информатика,
автор: TutorOnline
Предмет: Русский язык,
автор: gusevspartak2010
Предмет: Литература,
автор: Нина1022