Пожалуйста помогите, задачи в Паскале:
5-9 класс
|
1)Заполнить массив случайными числами от -100 до +100
и распечатать на экране только отрицательные числа
2)Дан массив из 20 элементов числа от -50 до +50
а)Каждый элемент больше 10 заменить на его квадратный корень
б)Все элементы с четными номерами заменить на их абсолютную величину(модуль)
в)Ко всем отрицательным элементам прибавить 5 , а к остальным первый элемент массива
var
i:integer;
a:array[1..20]of integer;
begin
for i:=1 to 20 do
begin
a[i]:=random(-100,100);
if a[i]<0 then write(a[i],' ');
end;
end.
2)
а)
Во втором все в одной программе делать или для каждой буквы отдельно?
Другие вопросы из категории
битами. Кроме того, рукопись содержит 80 иллюстраций объёмом 5 Мбайт каждая. Поместится ли рукопись на флэш-карту и какой её объём в Мегабайтах?
Читайте также
read.writeln.else.to.if и тд которые сможете
Вот пример идеи для программы, в академию поступают какое то количество учеников, нужно написать сколько учеников сдали документы, сколько пришли на экзамен, и сколько учеников кто прошло и не прошло
возможно не возможно создать программу на этой идее, тогда прделагайте свои со своими программами , пожалуйста помогите!
клавиатуры.
2)найти перевертышь трехзначного числа.
налево и слева направо.
обезьяна, курица, собака и свинья. Зная, что 1984 год был годом мыши, написать программу, выводящую номер года и его название.
Учитель сказал, что это решается через кейс..Только как.ПОЖАЛУЙСТА, ПОМОГИТЕ!!!!!!!!!!
1)вычислите длину окружности и круга по данному радиусу входные-длина окружности, s,l-выходные
2)Найти площадь кольца с внутренним радиусом r1 и внешним r2
3)Даны 2 положительных действительных. Найти средние арифметическое и средние геометрическое a,b - входные данные, (a,b)*2 -ср. арифмет.