Задать вопрос
13 января, 17:32

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

+2
Ответы (1)
  1. 13 января, 20:06
    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 ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы