Помогите составить блок схему и программу для вычисления суммы квадратов чисел до тех пор пока квадрат очередного числа не превысит 50
5-9 класс
|
var a,x,s: integer;
begin
a:=0;
while a<50 do begin
readln(x);
a:=x*x;
s:=s+a;
end;
writeln(s);
readln;
end;
Другие вопросы из категории
Дополнительный код для представления
числа -51, описанного как переменная типа char:
301
190
248
133
205
а) гбайт, тбайт, кбит, байт
б) тбайт, мбайт, кбайт, байт
в) тбайт, мбайт, кбит, байт
г) кбит, кбайт, мбайт, гбайт, тбайт
Читайте также
амеба каждые 3 часа делиться на 2 клетки. Определить, сколько амеб будет через 3,6,9,12 и 24 часа.
3) дано натуральное числоо N и действительное число Х. Вычислить сумму ряда sin(x)+sin(2x)+sin(3x)+...+sin(Nx).
4) написать программу для вычисления n-ой степени числа А.
помогите, пожалуйста)
2.Составить блок - схему кипячения чайника.
3.Составить алгоритм сбора яблок в саду.Ваша задача сводится к тому,что необходимо собрать ведро яблок с земли.
4.Составьте алгоритм на формальном языке и блок - схему для решения следущего примера : y=5x+6,если х=3
натуральных двузначных чисел, кратных 2, в программе- построение блок схем, используя циклический алгоритм
Cоставить программу, сообщающую о возможности
построения параллелограмма из отрезков X,Y,Z,T
Данные
1 , 2 , 1 , 2 можно
7 , 5 , 6 , 5 нельзя
Пожалуйста
Срочно
Надо