Написать программу в Паскаль ( цикл).
5-9 класс
|
+листинг.
очень срочно плиз:3
var
n, s :integer;
begin
n:= 0; s:= 0;
while n <= 100 do
begin
if n mod 2 = 0 then
begin
s:= s + n;
n:= n + 1;
end
else
n:= n + 1;
end;
writeln(s);
end.
Другие вопросы из категории
А)архивный
B)только для чтения
С)скрытный
D)только для записи
4. Для того чтобы вырезать какой-либо фрагмент текста или рисунка,какую комбинацию клавиш необходимо набрать?
A)Crtl+V
B)Crtl+Z
C)Crtl+C
D)Crtl+X
составить программу в паскале для вычисления суммы и произведения чисел от 1 до 2.000 делящихся на 10. Сразу проверяйте,чтоб программа была рабочая.
подробно
Переведи десятичное число 2325 в двоичную систему счисления.
1. В 8 корзинах лежит 16 шаров в каждой.Какой объем информации несет сообщение о том,что достали один шар из пятой корзины
2. Загадано число из промежутка от 1 до 64. Какое количество информации необходимо для угадывания числа из этого промежутка?
3.Сообщение
занимает 4 страницы. На каждой странице по 15 строк. В каждой строке по
72 символов. Найдите информационный объем такого текста,если при его
составлении использовали 64- символьный алфавит
Читайте также
паскаль 3)найти произведение последовательных натуральных чисел от n до m. написать программу паскаль. 4)найти сумму последовательных натуральных чисел от 10 до 15.тоже паскаль
1. Написать программу нахождения произведения n чисел.
n.
а) Напечатать те натуральные числа, квадрат которых не превышает n.
3) Дано натуральное число. Определить:
а) количество цифр 3 в нем;
г) сумму его цифр, больших пяти;
расположденных по диагонали
3.Написать программу рисующую горизонтальную цепочку из 12 кругов,каждый круг должен на половину закрывать предыдущий
Помогите,а то сижу с паскалем уже час с лишним и все никак не получается..
Заранее спасибо)
программы. Написать ее с помощью цикла for..to..do..