М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
Aleksandra231v
Aleksandra231v
15.06.2022 22:41 •  Информатика

написать программы по задачам в ПИТОНЕ! Очень надо! Много


написать программы по задачам в ПИТОНЕ! Очень надо! Много

👇
Ответ:
ahmetovalim
ahmetovalim
15.06.2022

привет меня зовут никто я даже задпчу не смоттрела

Объяснение:

ну смотри там нпдо сделать незнаб

4,4(74 оценок)
Открыть все ответы
Ответ:
oksiur4enko
oksiur4enko
15.06.2022
При протяжке выделенного диапазона Эксель определяет шаг между значениями и пытается автоматически построить последовательность с найденным шагом.
Январь имеет номер месяца 1, сентябрь - номер 9. Между ними 8 месяцев.
Тогда в А3 будет месяц номер 9+8=17. Но у нас 12 месяцев повторяются в цикле, поэтому вычитаем 12 и получаем 17-12=5. И в ячейке А3 будет месяц май.
В А4 будет месяц с номером 5+8=13, но 13>12, поэтому получим 13-12=1, а это январь. Январь у нас был, и что идет дальше известно: А5 - сентябрь, А6 - май, А7 - январь.
ответ: ЯНВАРЬ.
4,7(55 оценок)
Ответ:
zumi453
zumi453
15.06.2022
Числа вводятся пользователем. Прикрепил скрин работы программы, вот сама программа:

var a:array[1..999]of integer;
i,n:integer;
begin
write ('Введите кол-во чисел: ');
readln (n);
for i:=1 to n do
begin
write ('Введите ',i,' число: ');
readln (a[i]);
end;
WRITELN;
write ('Числа введённые пользователем: ');
for i:=1 to n do
write (a[i],' ');
WRITELN;
WRITELN;
write ('Положительные: ');
for i:=1 to n do
begin
if a[i]>0 then write (a[i],' ');
end;
WRITELN;
write ('Отрицательные: ');
for i:=1 to n do
begin
if a[i]<0 then write (a[i],' ');
end;
WRITELN;
write ('Чётные: ');
for i:=1 to n do
begin
if a[i] mod 2 = 0 then write (a[i],' ');
end;
WRITELN;
write ('Нечётные: ');
for i:=1 to n do
begin
if a[i] mod 2 <> 0 then write (a[i],' ');
end;
end.

Напишите программу которая выводит на экран (паскаль) а)положительные числа б)отрицательные в)четные
4,7(13 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ