народ помогите плиз записать задачи на паскале
10-11 класс
|
Задача 1.
var
i,s: integer;
begin
s:= 0;
for i:=21 to 99 do
if i mod 3=0 then begin
write(i,' ');
s:= s+i
end;
writeln(s)
end.
Другие вопросы из категории
а). 16 в степени x бит = 32 Мбайт
б). 8 в степени x Кбайт = 16 Гбайт.
Телефон) ; ПРОДАВЕЦ (Табельный_ном. , Фамилия, Имя, Отчество, Категория) Являются ли эти отношения связанными? Добавьте всё, что необходимо для их связи; изобразите схему БД в графическом виде.
Дан массив O ( K ). Заменить все положительные числа квадратом числа,а отрицательные модулем.
Задача вторая.
Дан массив R ( 6 ) .Найти сумму и произведение всех элементов массивов.
Через Qbasic
ОТ CLS ДО ЕND
Читайте также
1.Составьте программу, проверяющую, верно ли
утверждение, что введенное вами целое число является четным.
2.
10% нормы предыдущего дня. Какой суммарный путь пробежит спортсмен за N дней? Разработать схему алгоритма для решения этой задачи.
руб., журнал h руб. У покупателя денег S руб. Хватит ли их на 3 журнала и 2
книги?.
задачи на такую тему: Составление, ввод, трансляция и
исполнение программ, реализующих
циклические алгоритмы и типовые
операции с одномерными массивами