logo
Войти Регистрация Спроси ai-bota


termos68
25.01.2023 23:49

Подсчитать кол-во отрицательных чисел из 10 введенных с клавы (pascal abc.net)

Нажмите на рекламу ниже и сразу увидите ответ
↓
Популярные вопросы:
vladimirko0909
vladimirko0909
03.10.2021 02:56
В ячейке B2 была записана формула =$A2-1 Выберите из списка все ячейки, при копировании в которые формула не изменится.Выберите из списка все ячейки, при копировании...
nargiz999
nargiz999
31.03.2023 12:49
1. роль информационной деятельности в современном обществе. 2. word. создайте нумерованный список используя следующие исходные данные: производители печатных плат -...
anastaciarocha
anastaciarocha
30.09.2021 05:55
1. интернет-технологии и скоростные характеристики подключения, провайдер. 2. exel. заполните таблице. используя функцию счетесли, определите какое количество студентов...
llllll13
llllll13
16.03.2023 01:31
1. возможности программного обеспечения для организации коллективной деятельности в и локальных компьютерных сетях: электронная почта, чат, мессенжеры обмена мгновенного...
NasteonaSlasteona
NasteonaSlasteona
14.04.2020 05:35
Билет №1 1.примеры сетевых ис для различных направлений профессиональной деятельности. 2 word.создайте многоуровневый нумерованный список используя следующие исходные...
kskskdksks
kskskdksks
25.01.2022 05:22
Вгруппе учится n учащихся. определить самого высокого ученика. вывести его рост и порядковый номер по списку....
MARRISABEL
MARRISABEL
15.09.2020 03:43
Сообщение, записанное буквами из 256-символьного алфавита, содержит 60 символов. Какой объем информации в БАЙТАХ оно несет?...
lenalime
lenalime
17.02.2023 03:57
♡ Дайте развёрнутые ответы на следующие вопросы: 1. Опишите устройства, которые принято выделять в компьютерах классической архитектуры. 2. Что представляет собой аппаратное...
Гуманитарийлох
Гуманитарийлох
22.06.2020 07:36
Заповнити масив Ar[15] та підрахувати кількість позитивних значень...
kastalia2017
kastalia2017
18.03.2021 21:10
Якщо істина, повідомити менша і виконати команду 8, якщо хиба, то виконати команду 5( Scratch 3.18.1)...
Ответ:
ПотнаяБабка2000
06.10.2020 20:58
Program n1;
var a,i,k: integer;
begin
k:=0;
for i:=1 to 10 do
begin
readln(a);
if a<0 then k:=k+1;
end;
write(k);
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
О НАС
СООБЩЕСТВО
ПОМОЩЬ
App
.
.
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота