Вопрос задан 06.02.2019 в 14:38.
Предмет Информатика.
Спрашивает Ланская Алёна.
В "Кумир". 8 класс 1) Ввести число. Если оно больше 10, разделить его на 2, если меньше или равно
10, то умножить на 5. 2) Ввести два числа . Если их сумма больше 100, то сумму уменьшить в 2 раза, в противном случае увеличить в 2 разаОтветы на вопрос
Отвечает Тишик Артем.
№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
кон
Отвечает Цыплёва Даша.
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.
Топ вопросов за вчера в категории Информатика
Последние заданные вопросы в категории Информатика
Предметы
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili
