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

Программисты Паскалев и Питонов играют в числа. Паскалев задумывает два целых числа и сообщает Питонову их сумму и разность (из первого задуманного числа вычитается второе). Помогите Питонову найти задуманные числа по известным значениям их суммы и разности. Пожалуста, очень нужна программа на Паскале.

  1. Ответ
    Ответ дан Royal21
    {1-й вариант}
    var
    x,y,i,j: integer;
    begin
    writeln('Введите разность задуманных чисел: ');
    read(x);
    writeln('Введите сумму задуманных чисел: ');
    read(y);
    writeln('Задуманные числа: ',(y+x)/2,' и ',(y-x)/2); 
    end.   

    {2-й вариант}
    var
    x,y,i,j: integer;
    begin
    writeln('Введите разность задуманных чисел: ');
    read(x);
    writeln('Введите сумму задуманных чисел: ');
    read(y);
    for i:=1 to 1000 do
     begin
      for j:=1 to 1000 do
       if j - i = x then
        if j + i = y then writeln('Задуманные числа: ',j,' и ',i);
      end; 
    end.   
  2. Ответ
    Ответ дан StSerg
    А вот программа на Python
    k = raw_input("Введите сумму чисел:")
    l = raw_input("Введите разность чисел:")
    print "Задуманые числа:", (k+l)/2, (k-l)/2

    Я думаю написать ее на паскале у вас не составит труда, ибо зачем делать перебор когда можно просто решить систему?
Самые новые вопросы