Решите задачи - блок-схемы и Паскаль. 1.Дано число n=25.Если удвоенное число n >чем 60,то увеличить число в 7 раз, в противном случае уменьшить в 10 раз. Вывести полученное число.
2. Даны 2числа, a=70 и число b. Если сумма чисел <250, то первое уменьшить на 15,иначе первое увеличить на 20.вывести первое число
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.