Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.83/6: Рейтинг темы: голосов - 6, средняя оценка - 4.83
0 / 0 / 0
Регистрация: 08.10.2018
Сообщений: 93

Выполнить задачу, используя процедуру или функцию

15.10.2018, 11:44. Показов 1315. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Решить задачу, используя процедуру или функцию. Выбор обосновать. На при-мере полученной программы продемонстрировать умение:
1) назначать точку останова;
2) пошаговое выполнение программы с заходом в процедуры и без захода;
3) определять значения переменных.
Определить количество простых чисел в целочисленном массиве С(n), (n<=100).
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
15.10.2018, 11:44
Ответы с готовыми решениями:

Не получается составить программу используя процедуру или функцию.
Очень нужна помощь старших в решении задачи. Вот изображение вопроса:

Вычислить сумму i+k используя рекурсивную функцию или процедуру на языке Паскаль
y=\sum_{i=1}^{n}i+k Вот эту задачу надо решить используя рекурсивную функцию или процедуру. Дополнительное условие: &quot;k -...

Используя стек, написать процедуру или функцию, которая определяет количество вхождений буквы Е в файл
Используя стек, написать процедуру или функцию, которая определяет количество вхождений буквы Е в файл.

1
Модератор
Эксперт Pascal/DelphiЭксперт NIX
 Аватар для bormant
7816 / 4635 / 2837
Регистрация: 22.11.2013
Сообщений: 13,158
Записей в блоге: 1
15.10.2018, 12:52
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
function IsPrime(n: Longint): Boolean;
var i, q, d: Word;
begin
  if (n>=5) and ((n-1) mod 6=0) or ((n+1) mod 6=0) then begin
    i:=5; d:=2; q:=Trunc(SqRt(n));
    IsPrime:=False;
    while i<=q do begin
      if n mod i=0 then Exit;
      Inc(i,d); d:=d xor 6;
    end;
    IsPrime:=True;
  end else
    IsPrime:=(n=2) or (n=3);
end;
Pascal
1
2
3
4
5
  {k:=0;}
  for i:=1 to n do
    if IsPrime(c[i]) then
      Inc(k);
  WriteLn(k);
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
15.10.2018, 12:52
Помогаю со студенческими работами здесь

Найти наибольшую высоту треугольника, если известно координаты его вершин, используя функцию или процедуру
Найти наибольшую высоту треугольника, если известно координаты его вершин, используя функцию или процедуру.

Выполнить поставленную задачу, используя средства управления вводом/выводом
Решить поставленную задачу, используя средства управления вводом/выводом. Дан целочисленный массив А(n,n) (n&lt;=6). Вывести его на экран,...

Используя рекурсивную процедуру и функцию....
Используя рекурсивную процедуру и функцию, составьте программу решения следующей задачи:1+3+5+7+9+...

Функцию или процедуру к задаче!
Помогите сделать для цикла функцию или процедуру, я не умею а оч нада, я пытался но не фига не получается, вот листинг: Program...

Добавить в программу функцию или процедуру
Добавьте сюда функцию или процедуру uses crt; var n,i:integer; b: array of real; begin writeln( 'введите n=' ); readln(n); ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android
8Observer8 26.01.2026
Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .
Установка Android SDK, NDK, JDK, CMake и т.д.
8Observer8 25.01.2026
Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .
Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf
8Observer8 25.01.2026
Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .
Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly
8Observer8 24.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
моя боль
iceja 24.01.2026
Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .
Модель сукцессии микоризы
anaschu 24.01.2026
Решили писать научную статью с неким РОманом
http://iceja.net/ математические сервисы
iceja 20.01.2026
Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .
http://iceja.net/ сервер решения полиномов
iceja 18.01.2026
Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru