составить программу, чтобы считать сумму квадратов первых пятидесяти натуральных чисел.
10-11 класс
|
var s,k:integer;
begin
s:=0;
for k:=1 to 50 do
begin
s:=s+sqr(k);
end;
writeln(s);
end.
Другие вопросы из категории
Задание 1
Выполнить преобразование шестнадцатеричного числа в десятичное:
Числа 22В1 и 968
Задание 2
Выполнить преобразование двоичного числа в десятичное:
Числа 10011101110101 и 1111100111
Задание 3
Выполнить преобразование целого десятичного числа в шестнадцатеричное:
Числа 999 и 10985
Задание 4
Выполнить преобразование целого десятичного числа в двоичное:
Числа 999 и 10985
Задание 5
Выполнить преобразование шестнадцатеричного числа в двоичное
Числа 2АЕ9 и 22В1
Задание 6
Выполнить преобразование двоичного числа в шестнадцатеричное
Числа 10011101110101 и 1111100111
1. основные объекты базы данных: 1) таблица, 2) маркер, 3) элементы управления
2. Сама база данных - это 1) папка, 2) документы, 3) структура таблиц
3. Каждая запись в базе данных имеет слева кнопку, называемую 1) маркером записи, 2) маркером, 3) строкой состояния
Значения элементов двух массивов А и В размером [1...70] задаются с помощью следующего фрагмента программы:
For i:=1 to 70 do
A[i]:=30-i;
For i:=1 to 70 do
B[i]:=A[i]+30;
Сколько элементов массива B будут иметь отрицательные значения?
Варианты: 1) 0 ; 2) 10 ; 3) 50 ; 4) 1.
паскаль и блок-схему.заранее спасибо)
Читайте также
получает на вход два натуральных числа А и В, не превосходящих 10^9^ А<=В . Программа должна вывести одно число - кол-во натуральных чисел, больше или равных А и меньших или равных В, сумма цифр которых четна.
(n=9 1, 4,9 .... 81)
(Определить процедуру, распознающую НОД двух чисел)