Внимание! center-referat.ru не продает дипломы, аттестаты об образовании и иные документы об образовании. Все услуги на сайте предоставляются исключительно в рамках законодательства.

Готовые дипломные, курсовые, рефераты. Вы можете бес-платно скачать любую понравившуюся работу.

1.Найти количество натуральных чисел, не превышающих 100 и кратных 5.2.Создать массив А...

Сегодня примерно в 21:32 на наш email ящик поступил вопрос, который наши модераторы от-несли к категории Разное. Постараемся дать на него полноценный ответ.

Тема вопроса с пояснением

1.Найти количество натуральных чисел, не превышающих 100 и кратных 5.
2.Создать массив А из 10 элементов, принадлежащих промежутку (0;25). Вывести полученный массив на экран. Подсчитать количество элементов, больших А [1]. Все с помощью Паскаля

Ответ с привлечением экспертов

Среди нашей команды есть эксперты, которые успешно отвечают на вопросы из рубрики "Информатика". Напомним, что вы задали следующий вопрос:

1.Найти количество натуральных чисел, не превышающих 100 и кратных 5.
2.Создать массив А из 10 элементов, принадлежащих промежутку (0;25). Вывести полученный массив на экран. Подсчитать количество элементов, больших А [1]. Все с помощью Паскаля

И сразу же ответим на него:

После проведенного совещания с другими специалистами нашего сервиса, мы склонны пола-гать, что правильный ответ на заданный вами вопрос будет звучать следующим образом:

1.
var i,k:integer;
begin
k:=0;
for i:=1 to 100 do
begin
if (i mod 5 = 0) then k:=k+1;
end;
writeln (k);
end.


Авторские права 2002-2020 center-referat.ru