Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
smasa3450
20.11.2022 13:18 •
Информатика
Подсчитать количество отрицательных чисел из 10 введенных с клавиатуры
Ответ:
gjz123456
09.08.2020 16:58
Program n1;
var a,i,k: integer;
begin
k:=0;
for i:=1 to 10 do
begin
write('введите ',i,' число: ');
readln(a);
if a<0 then k:=k+1;
end;
write('количество: ',k);
end.
0,0
(0 оценок)
Ответ:
figa333
09.08.2020 16:58
#include <iostream>
int main() {
int k, i, t;
k=0;
for (i=1; i<=10; i++) {
std::cin>>t;
if (t<0) {k+=1;}
}
std::cout<<k;
}
0,0
(0 оценок)
Популярные вопросы: Информатика
Kolodey200453
22.02.2020 01:20
Ваня по утром часто одевается в темноте,чтобы не разбудить свою маленькую сестренку ,и поэтому иногда приходить в школу в разных носках.в ящике у него лежат 4 носков: краные,черные,зеленые...
KrasnovaLu82
23.04.2023 14:33
Задан двумерный массив В(5, 5), заполненный случайными числами из промежутка [-9,9]. Найти и вывести на экран те элементы массива, которые больше заданного k. Паскаль...
tony23
06.06.2022 00:37
Поочередно вводятся целые числа, не превышающие по значению 100. Для каждого из них нужно вывести результат от целочисленного деления на 2. Если вводится число больше 100,...
andreybalashov
21.11.2021 06:57
разобрать задание по Операционным системам и средам Я...
счастье101
21.01.2022 13:59
Вариант 7 1. Начертите фигуру, изображенную на рисунке, используя алгоритм с циклом. (там ступеньки в нижний левый угол) 2. Начертите фигуру, изображенную на рисунке, используя...
diasj5kz
10.03.2022 08:45
К донербыл(-а) сегодня в 13:361 11. Какой предмет (предметы)являлись счетным эталоном убольшинства народов вдоисторические времена?А. ПальцыВ. СчетыС. Абак...
marselk2
12.08.2022 04:25
Нанометр және микрон дегеніміз не...
SeyshellaGoa
12.10.2021 21:57
1. Представьте информацию в структурном виде так, чтобы ее было легче воспринимать: «Озеро Байкал находится на юг Восточной Сибири. Длина озера 636 км, ширина 80 км, площадь...
FayaKuraeva
14.08.2020 21:11
Рассказ как охотились первобытные люди на диких козлов?...
polinayac
14.08.2020 21:11
Голос, честь, досада,чувство, старый, мелкий, слабый, дешевый, нервный, подлый,жадный, цитата, провокация, операция. образовать от данных слов глаголы. плс....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var a,i,k: integer;
begin
k:=0;
for i:=1 to 10 do
begin
write('введите ',i,' число: ');
readln(a);
if a<0 then k:=k+1;
end;
write('количество: ',k);
end.
int main() {
int k, i, t;
k=0;
for (i=1; i<=10; i++) {
std::cin>>t;
if (t<0) {k+=1;}
}
std::cout<<k;
}