Задать вопрос
30 сентября, 07:27

Вычислить сумму квадратов a и b в abc pascal

+5
Ответы (1)
  1. 30 сентября, 09:46
    0
    Program Summa;

    var k, f, a, b, S: integer;

    Begin

    Readln (a, b);

    k:=a*a;

    f:=b*b

    S:=k+f;

    Writeln (S);

    end.
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «Вычислить сумму квадратов a и b в abc pascal ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы