Регистрация
goloshapov145
25.03.2021 15:40
Информатика
Есть ответ 👍

Найти сумму квадратов нечетных чисел в диапазоне от а и в cделать в delphi

295
416
Посмотреть ответы 2

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

Маша20041124
Маша20041124
4,7(77 оценок)

дельфи - тот же паскаль в принципе вот тебе кусок кода вычисляющего исходное

его запихнешь в какой-нибудь button1.click() 

 

в edit1 и   edit2   вводятся а и b 

 

 

 

 

  var a,b,i: longint;  

 

s: =0;  

a: =strtoint(edit1.text);

b: = strtoint(edit2.text);  

 

 

for   i: =a to b do

      if   (a mod 2)< > 0 then s: =s+sqr(i);  

 

 

  showmessage(strtoint(s));

 

 

DizzyWarriorr
DizzyWarriorr
4,7(90 оценок)
ответ:
Г
Объяснение:

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