Циклы.

@allod · Регистрация: 07.10.2011

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

Задача:
Составить программу с использованием цикла с предусловием или постусловием для вычисления и вывода на экран таблицы значений функции.
На экран выводится 2 столбика А (значение параметра) и F (значение функции). К параметру А, который вводится с клавиатуры прибавляются значения от 0.1 до 1.25 с шагом в 0.1. Т.е. должно получится 13 значений параметра (включая первое, вводимое значение с клавиатуры): A, A+0.1, A+0.2, A+0.3 и так далее, до А+1.2 (включительно).

Функция http://www.valar.ru/gallery/1011/1317986742_12.png

Попробовал решить, но не получается ;(

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
program z1;
uses crt;
var amin,amax,da:real;
a,f:real;
begin
clrscr;
write ('Введите значение параметра* A= '); readln(a);
write ('Введите начальное значение '); readln(amin);
write ('Введите конечное значение '); readln(amax);
write ('Введите шаг '); readln(da);
writeln ('|______|_______|');
writeln ('|   A  |    F  |');
writeln ('|______|_______|');
a:=amin;
repeat
f:=(3*a+4)/a*a-5*a-9;
a:=a+da;
writeln ('|', a:6:2,'|', f:7:2,'|');
until a > amax+da/2;
writeln ('|______|_______|');
readln;
end.

Программа не хочет показывать изменения параметра в столбике А, вместо этого почему то идут числа от 0.1 до 1.2. Значение функции не изменяется при вводе различных значений А. ;(
Возможно что то не то в until...

@o-user · 07.10.2011, 16:59

Запустил программу. Ввел: 1 2 3 .1
Все работает.

А что вводите Вы? Что получается? Скриншот?!

@allod · 07.10.2011, 17:30 **[ТС]**

http://www.valar.ru/gallery/1011/1317994335_1.png
http://www.valar.ru/gallery/1011/1317994351_2.png
http://www.valar.ru/gallery/1011/3.png

значение параметра А - любое.
начальное значение 0.1
конечное значение 1.25
шаг 0.1

По идее столбец A должен изменятся так:
к вводимому числу А (например 50) должны прибавляться цифры 0.1, 0.2, 0.3, 0.4, 0.5, 0.6, 0.7, 0.8, 0.9, 1, 1.1, 1.2
Т.е. столбик А должен состоять из цифр: 50.1, 50.2, 50.3, 50.4, 50.5, 50.6, 50.7, 50.8, 50.9, 51, 51.1, 51.2

Так как функция F вычисляется по данной формуле, то в столбике F должны быть разные значения, которые зависят от значений параметра А.

Но вот проблема, период чисел от 0.1 до 1.25 с шагом в 0.1 не хотят складываться с параметром А. В столбике А появляются, только параметры от начального до конечного значения с соблюдением шага.

@o-user · 07.10.2011, 17:42

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
program z1;
uses crt;
var amin,amax,da:real;
a,f,b:real;
begin
clrscr;
write ('Введите значение параметра* A= '); readln(b);
write ('Введите начальное значение '); readln(amin);
write ('Введите конечное значение '); readln(amax);
write ('Введите шаг '); readln(da);
writeln ('|______|_______|');
writeln ('|   A  |    F  |');
writeln ('|______|_______|');
a:=b+amin;
repeat
f:=(3*a+4)/a*a-5*a-9;
writeln ('|', a:6:2,'|', f:7:2,'|');
a:=a+da;
until a > b+amax+da/2;
writeln ('|______|_______|');
readln;
end.

@allod · 07.10.2011, 18:09 **[ТС]**

http://www.valar.ru/gallery/1011/1317996964_12.png

Первое число в столбике должно начинаться с 50.1, а заканчиваться 51.2. Так как период прибавляемых значений от 0.1 до 1.25. С шагом в 0.1 конечное значение будет 1.2 (1.3 не вписывается под конечное из условий), т.е в нашем случае 51.2.

Здесь же показан результат периода от 0.2 до 1.4 с шагом 0.1

@o-user · 07.10.2011, 18:28

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

http://www.valar.ru/gallery/1011/1317996964_12.png

Первое число в столбике должно начинаться с 50.1, а заканчиваться 51.2. Так как период прибавляемых значений от 0.1 до 1.25. С шагом в 0.1 конечное значение будет 1.2 (1.3 не вписывается под конечное из условий), т.е в нашем случае 51.2.

Здесь же показан результат периода от 0.2 до 1.4 с шагом 0.1

1. В моем варианте начало с 50.1
Смотрите внимательнее!!!

2. Вы сами задали проверку
until a > b+amax+da/2;

Я думал так надо и не исправил.

Тогда исправьте на:
until a > b+amax;

@allod · 07.10.2011, 18:56 **[ТС]**

Сообщение от o-user

1. В моем варианте начало с 50.1
Смотрите внимательнее!!!

А, точно =)

Сообщение от o-user

2. Вы сами задали проверку
until a > b+amax+da/2;

Я думал так надо и не исправил.

Тогда исправьте на:
until a > b+amax;

Работает.

Большое спасибо за помощь!

Новые блоги и статьи Все статьи Все блоги /
Конвертировать закладки radiotray-ng в m3u-плейлист damix 19.02.2026 Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .	Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI Eddy_Em 18.02.2026 Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .	Символьное дифференцирование igorrr37 13.02.2026 / * Программа принимает математическое выражение в виде строки и выдаёт его производную в виде строки и вычисляет значение производной при заданном х Логарифм записывается как: (x-2)log(x^2+2) -. . .	Камера Toupcam IUA500KMA Eddy_Em 12.02.2026 Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу zbw 12.02.2026 И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.	«Знание-Сила» zbw 12.02.2026 «Знание-Сила» «Время-Деньги» «Деньги -Пуля»	SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 12.02.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 11.02.2026 Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .

@o-user 247 / 205 / 26 Регистрация: 03.02.2009 Сообщений: 785
	07.10.2011, 16:59
	Запустил программу. Ввел: 1 2 3 .1 Все работает. А что вводите Вы? Что получается? Скриншот?! 1

@allod 6 / 6 / 1 Регистрация: 07.10.2011 Сообщений: 20
	07.10.2011, 17:30 [ТС]
	http://www.valar.ru/gallery/1011/1317994335_1.png http://www.valar.ru/gallery/1011/1317994351_2.png http://www.valar.ru/gallery/1011/3.png значение параметра А - любое. начальное значение 0.1 конечное значение 1.25 шаг 0.1 По идее столбец A должен изменятся так: к вводимому числу А (например 50) должны прибавляться цифры 0.1, 0.2, 0.3, 0.4, 0.5, 0.6, 0.7, 0.8, 0.9, 1, 1.1, 1.2 Т.е. столбик А должен состоять из цифр: 50.1, 50.2, 50.3, 50.4, 50.5, 50.6, 50.7, 50.8, 50.9, 51, 51.1, 51.2 Так как функция F вычисляется по данной формуле, то в столбике F должны быть разные значения, которые зависят от значений параметра А. Но вот проблема, период чисел от 0.1 до 1.25 с шагом в 0.1 не хотят складываться с параметром А. В столбике А появляются, только параметры от начального до конечного значения с соблюдением шага. 0

@allod 6 / 6 / 1 Регистрация: 07.10.2011 Сообщений: 20
	07.10.2011, 18:09 [ТС]
	http://www.valar.ru/gallery/1011/1317996964_12.png Первое число в столбике должно начинаться с 50.1, а заканчиваться 51.2. Так как период прибавляемых значений от 0.1 до 1.25. С шагом в 0.1 конечное значение будет 1.2 (1.3 не вписывается под конечное из условий), т.е в нашем случае 51.2. Здесь же показан результат периода от 0.2 до 1.4 с шагом 0.1 0