Ответ.
Меню
Задать вопрос!
Вход
Регистрация
Задать вопрос!
Меню
Все категории
Фотография и видеосъемка
Знания
Другое
Гороскопы, магия, гадания
Общество и политика
Образование
Путешествия и туризм
Искусство и культура
Города и страны
Строительство и ремонт
Работа и карьера
Спорт
Стиль и красота
Юридическая консультация
Компьютеры и интернет
Товары и услуги
Темы для взрослых
Семья и дом
Животные и растения
Еда и кулинария
Здоровье и медицина
Авто и мото
Бизнес и финансы
Философия, непознанное
Досуг и развлечения
Знакомства, любовь, отношения
Наука и техника
vitarlaeda
8 месяцев назад
5
Помогите пожалуйста составить программу в Pascal ABC : Произвели опрос N людей. Каждый их них назвал год и номер месяца своего р
ождения.
Определить и вывести на экран, сколько людей родились в мае 1995 года
Знания
Информатика
Ответить
Комментировать
Отправить
1
ответ:
Maximnasolarise
8 месяцев назад
0
0
const
n = 4; //кол-во людей
g = 1995;//год
m = 5; //номер месяца
var
i,gR,mR,k : integer;
begin
k := 0;
for i := 1 to n do
begin
writeln ('Введите год и месяц');
read (gR,mr);
if (gR = g) and (mr = m) then
k := k +1;
end;
writeln ();
writeln (k);<span>
end.</span>
Отправить
Читайте также
Полное название клавиши с помощью которой удаляют символы расположенные справа от курсора
kirill2013vip
Как аву устоновить?
а?
0
0
3 года назад
Прочитать ещё 2 ответа
Какое количество информации содержит текст, представленный на экране монито- ра и состоящий из 20 строк по 40 символов в каждой
ВалерияХрабан
Содержит800 символов информации
0
0
3 года назад
Информация, полученная на доступном языке, называется:а) полной.б) полезной.в) актуальной.г) достоверной.д) понятной.
Лилия Максимовна
Д называется понятной
0
0
3 года назад
Составить программу, использую цикл while do. Вывести числа в следующем порядке 2, 4, 6, 8 ,10 ...20
Allalygovskaj [50]
//Pascal ABC.NET v3.0 сборка 1111
var
a:integer;
begin
a:=0;
while a<>20 do
begin;
a:=a+2;
write(a:4);
end;
<span>end.</span>
0
0
3 года назад
Помогите с решением. 8 номер. можно с объяснением пожалуйста. А то учитель задал и ничего не рассказал.
Геня
Я не знаю ответа,но мне всегда помогает прочитать параграф пару раз и понять,и сама делаю
0
0
3 года назад
Смотрите также:
Напишите общие свойства объекта-оригинала и модели. Ребенок кукла, местность карта местности, здание рисунок, событие текст, явл
6
·
1 ответ
Дана действительная матрица размера n на m. Получить последовательность b1, b2,..., bn, где bk-это произведение квадратов тех эл
15
·
1 ответ
Напишите программу, которая выводит на экран коды символов 'A', 'B', 'C' , ...., 'Z'.
11
·
1 ответ
Прошу Помогите я вам буду очень благодарен!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!Напишите программу, которая в посл
5
·
1 ответ
Что значит "А:" в компьютере
5
·
2 ответа
1. Определите информационный объём моно аудиофайла длительностью 8 сек. при частоте дискретизации 44000 и глубине кодирования 8
6
·
1 ответ
Переведите данные числа в десятичную систему счисления 101110в2 , 1234в5 , DEв16
7
·
1 ответ
Пж ПОМОГИТЕ 1 ВОПРОС Какое программное обеспечение компьютера является базовым?
14
·
1 ответ
Сможете нарисовать код в Черепашке? Нужно нарисовать эту фигурку ( скрин приложен) с использованием цикла - " повтори ( n ) " .
5
·
1 ответ
Нужно написать код сайта по картинке. 24 балла за выполнение
8
·
1 ответ
×
Добавить ответ
Отправить
×
Вход
E-mail
Пароль
Запомнить меня
Войти
Не зарегистрированы?
Пройти быструю регистрацию
×
Регистрация
Ваше имя
E-mail
Пароль
Зарегистрироваться
close
Вход
Регистрация
Задать вопрос!