Регистрация
taty30
04.05.2020 22:00
Информатика
Есть ответ 👍

Даны два числа. большее число увеличить на 3, а меньшее уменьшить на 5

265
412
Посмотреть ответы 2

Ответы на вопрос:

jungkokBTSlove
jungkokBTSlove
4,8(49 оценок)

program chisla;

uses crt;  

var a,b: real;

begin

      clrscr;

        write('введите число а:   ');

 

        readln(a);  

        write('введите число b:   ');

        readln(b);  

      if (a=b) then writeln('числа равны');  

 

 

        if (a> b) then 

              begin  

 

                  a: =a+3;                

                  b: =b-5;    

              end    

 

      else           

              begin  

                  b: =b+3;                

                  a: =a-5;    

              end

  writeln('a= ',a);

    writeln('b= ',b);  

    readkey;

 

end. 

 

 

Алиса2016
Алиса2016
4,6(50 оценок)
Что это на каком языке

Популярно: Информатика