profile
Опубликовано 5 лет назад по предмету Информатика от НикитаСм

1.Дано целое число N.Написать программу ,увеличивающую число в 3 раза ,если оно больше нуля
2.Дано целое число N.Написать программу ,заменяющую его нулём ,если больше  или равно нулю,и увеличивающая его в 2 раза ,если число меньше нуля.
3 .Дано целые числа  a и b .Написать программу , которая выводит сначала большее  число ,затем меньшее.
4.Даны числа a,b,c.Написать программу ,выводящую их в возрастающем порядке.
ПЛИЗ ПОМОГИТЕ

  1. Ответ
    Ответ дан alexmishenev
    я напишу часть кода.инициальзация очевидна
    1:
    readln(n);
    if n >3 then n:= n*3;
    writeln(n);
    2:
    readln(n);
    if n < 0 then n:= n*2
    else n:=0;
    writeln(n);
    3:
    readln(a,b);
    if a c:=a;
    a:=b;
    b:=c;
    end;
    writeln(a,b);
    4:
    аналогично с 3только сравниваеье снаяала а и b, а и с,затем b и с,если возникнут трудности код выложу
Самые новые вопросы