Добавить в программу функцию или процедуру

@pashocheck · Регистрация: 04.11.2015

Author24 — интернет-сервис помощи студентам

Добавьте сюда функцию или процедуру

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
uses crt;
var n,i:integer;
b: array [ 1 .. 100 ] of real;
begin
 writeln( 'введите n=' );
 readln(n);
 b[1]:=9;; 
 writeln(b[ 1 ]: 5 : 5 ); 
 for i:= 2 to n do 
  begin b[i]:=0.1*b[i- 1 ]+10;
   writeln(b[i]: 5 : 5 );
  end; 
end.

Добавлено через 22 часа 49 минут

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
uses crt;
procedure q(i,n:integer);
begin
 var b: array [ 1 .. 100 ] of real;
  for i:= 2 to n do 
   begin
    b[i]:=0.1*b[i- 1 ]+10;
    writeln(b[i]: 5 : 5 );
   end;
end;
begin
 var n,i:integer; 
 var b: array [ 1 .. 100 ] of real;
  writeln( 'введите n=' );
  readln(n);
  b[1]:=9; 
  writeln(b[ 1 ]: 5 : 5 );
  q(i,n);
end.

выдает не совсем верные ответы: не показывает 9 десятых, сотых, тысячных и т.д

@Constantin Cat · 06.11.2015, 00:10

Сообщение от pashocheck

Добавлено через 22 часа 49 минут
выдает не совсем верные ответы: не показывает 9 десятых, сотых, тысячных и т.д

Это надо так рабочий код испортить.

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
uses crt;
var n,i:integer;
b: array [ 1 .. 100 ] of real;
function f_x(a:real):real;
  begin
    f_x:=0.1*a+10
  end;
begin
 write( 'введите n=' );
 readln(n);
 b[1]:=9;
 writeln(b[ 1 ]: 5 : 5 );
 for i:= 2 to n do
  begin b[i]:=f_x(b[i-1]);
   writeln(b[i]: 5 : 5 );
  end; 
end.

Новые блоги и статьи Все статьи Все блоги /
Многопоточные приложения на C++ bytestream 14.05.2025 C++ всегда был языком, тесно работающим с железом, и потому особеннно эффективным для многопоточного программирования. Стандарт C++11 произвёл революцию, добавив в язык нативную поддержку потоков,. . .	Stack, Queue и Hashtable в C# UnmanagedCoder 14.05.2025 Каждый опытный разработчик наверняка сталкивался с ситуацией, когда невинный на первый взгляд List<T> превращался в узкое горлышко всего приложения. Причина проста: универсальность – это прекрасно,. . .	Как использовать OAuth2 со Spring Security в Java Javaican 14.05.2025 Протокол OAuth2 часто путают с механизмами аутентификации, хотя по сути это протокол авторизации. Представьте, что вместо передачи ключей от всего дома вашему другу, который пришёл полить цветы, вы. . .	Анализ текста на Python с NLTK и Spacy AI_Generated 14.05.2025 NLTK, старожил в мире обработки естественного языка на Python, содержит богатейшую коллекцию алгоритмов и готовых моделей. Эта библиотека отлично подходит для образовательных целей и. . .	Реализация DI в PHP Jason-Webb 13.05.2025 Когда я начинал писать свой первый крупный PHP-проект, моя архитектура напоминала запутаный клубок спагетти. Классы создавали другие классы внутри себя, зависимости жостко прописывались в коде, а о. . .
Обработка изображений в реальном времени на C# с OpenCV stackOverflow 13.05.2025 Объединение библиотеки компьютерного зрения OpenCV с современным языком программирования C# создаёт симбиоз, который открывает доступ к впечатляющему набору возможностей. Ключевое преимущество этого. . .	POCO, ACE, Loki и другие продвинутые C++ библиотеки NullReferenced 13.05.2025 В C++ разработки существует такое обилие библиотек, что порой кажется, будто ты заблудился в дремучем лесу. И среди этого многообразия POCO (Portable Components) – как маяк для тех, кто ищет. . .	Паттерны проектирования GoF на C# UnmanagedCoder 13.05.2025 Вы наверняка сталкивались с ситуациями, когда код разрастается до неприличных размеров, а его поддержка становится настоящим испытанием. Именно в такие моменты на помощь приходят паттерны Gang of. . .	Создаем CLI приложение на Python с Prompt Toolkit py-thonny 13.05.2025 Современные командные интерфейсы давно перестали быть черно-белыми текстовыми программами, которые многие помнят по старым операционным системам. CLI сегодня – это мощные, интуитивные и даже. . .	Конвейеры ETL с Apache Airflow и Python AI_Generated 13.05.2025 ETL-конвейеры – это набор процессов, отвечающих за извлечение данных из различных источников (Extract), их преобразование в нужный формат (Transform) и загрузку в целевое хранилище (Load). . . .

Опции темы