69

Помогите с написанием программы! Нужно написать программу в Паскале. Найти сумму…

26 марта 2023

Помогите с написанием программы! Нужно написать программу в Паскале. Найти сумму а 1+2 а 2+3 а 3+… +8 а 8

категория: информатика



95

Program sum; uses crt; vara,r: real; i: integer; beginclrscr; r: =0; writeln ('Vvedite chislo a: '); read (a); for i: =1 to 8 do r: =r+(i*a*i); writeln ('Otvet: ',r); end.

Знаете ответ?


Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...