Tiedeman Karlпосчитайте задачи - блок-схемы и Паскаль. 1. Дано число n=25. Если удвоенное число n >чем 60,то увеличить число в 7 раз, в противном случае уменьшить в 10 раз. Вывести полученное число. 2. Даны 2числа, a=70 и число b. Если сумма чисел <250, то первое уменьшить на 15,иначе первое увеличить на 20. вывести первое число
ответы: 1
Зарегистрируйтесь, чтобы добавить ответ
Ответ:
1)
var
n : integer;
begin
n:=25;
if n*2 > 60 then
writeln(n*7)
else
writeln(n*10);
end.
2)
begin
a:=70;
readln(b);
if a+b < 250 then
a:=a-15
else
a:=a*20;
writeln(a);
end.
211
KatlinЧтобы ответить необходимо зарегистрироваться.
