Спросите у пользователя , сколько нужно проанализировать чисел, а затем запросите эти числа и сделайте для каждого вывод, является ли оно четным или отрицательным.(Паскаль)
Предмет:
ИнформатикаАвтор:
jermainenqecvar
a : array [1..100] of integer;
n, i : integer;
flag : boolean;
begin
write ('Введите количество чисел: ');
readln (n);
for i := 1 to n do
begin
write (i, '-ое число = ');
readln (a[i]);
end;
for i := 1 to n do
begin
write (i, '-оечисло ');
if a[i] < 0 then
begin
write ('отрицательно');
flag := true;
end;
if a[i] mod 2 = 0 then
begin
write ('четно');
flag := true;
end;
if not flag write ('никакое');
flag := false;
writeln;
end;
end.
Автор:
atlasramirezДобавить свой ответ
Выполните задание по образцу. Придумайте два примера действия сила, укажите точку приложения.
Образец: Цветок действует на крышку стола.Точка приложения силы находится на столе.
Штангист поднимает штангу. Точки приложения силы находится в штанге.
1.__________________________________________________________________________________________________________________________________________________________________________________________________________
2.__________________________________________________________________________________________________________________________________________________________________________________________________
Две стороны квадрата уменьшили на 3см, при этом образовался прямоугольник, площадь которого на 6см квадратных мешьше площади квадрата.Найдите сторону квадрата.
Предмет:
АлгебраАвтор:
terrellnuu6Ответов:
Смотреть
Придумайте и запишите предложение, в которых были бы использованы оба однокоренных слова. Власть - властный
Предмет:
Русский языкАвтор:
emilianoqdayОтветов:
Смотреть
Какие были события в эти даты?
40-е гг.ХIX в.
1876 г.
1895 г.
30-е гг. ХХ в.
1969г.?
пожалуйста помогите=)