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

Составить блок-схему и программу вычисления значения функции + написать программу

20.12.2009, 12:50. Показов 11978. Ответов 1
Метки нет (Все метки)

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



Прошу решить в качестве проверки. Нужно сдать в понедельник.
Буду очень благодарен!
Заранее СПАСИБО!!!

Номера: 7, 8, 17 (а)
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
20.12.2009, 12:50
Ответы с готовыми решениями:

Составить блок схему вычисления значения функции, а затем составить программу
Составить блок схему вычисления значения функции, а затем составить программу

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

Составить блок-схему алгоритма и программу для вычисления функции
Нужна помощь в решении Составить блок-схему алгоритма и программу для вычисления по формуле для произвольных исходных данных с двойной...

1
 Аватар для Тамила
753 / 546 / 211
Регистрация: 12.11.2009
Сообщений: 1,100
20.12.2009, 14:00
Лучший ответ Сообщение было отмечено MT как решение

Решение

7.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
uses crt;
var
x:integer;
y:real;
begin clrscr;
write('x=');
read(x);
if x<4 then y:=(2*sqr(x)*x+1)/(x-5);
if x>=4 then y:=3*sqr(x)-2;
writeln('Y=',y:2:3);
readkey;
end.
Добавлено через 6 минут
8.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
uses crt;
var
a,b,c:integer;
begin clrscr;
write('a='); read(a);
write('b='); read(b);
write('c='); read(c);
writeln;
if a<0 then writeln('a^2=',sqr(a)) else writeln('a>0');
if b<0 then writeln('b^2=',sqr(b)) else writeln('b>0');
if c<0 then writeln('c^2=',sqr(c)) else writeln('c>0');
readkey;
end.
Добавлено через 7 минут
17.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
uses crt;
var
x,y:real;
begin clrscr;
write('x=');
read(x);
write('y=');
read(y);
if ((sqr(x)+sqr(y))<=1) and (y>=0) then
writeln('tocka A[',x:1:1,',',y:1:1,'] prinadlegit figure')
else writeln('tocka A[',x:2:2,',',y:2:2,'] NE prinadlegit figure');
readkey;
end.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
20.12.2009, 14:00
Помогаю со студенческими работами здесь

Построить блок-схему и написать программу (Паскаль) вычисления значения выражения
Прикрепил ниже.

Составить блок-схему алгоритма и программу для вычисления функции по формуле
Доброго времени суток! Подскажите пожалуйста ,как составить блок схему алгоритма и программу для вычисления функции по формуле, для...

Изобразить блок-схему и написать программу для вычисления функции
y=2*(х-1)^2, если х&gt;=0, (-2)*х-2, если х&lt;0.

Написать программу и создать блок-схему вычисления функции в заданной точке
Составить программу для нахождения значение функции в точке а. Значение а вводится с клавиатуры _____cos(2x)-1, при x=&lt;0; ...

Ветвления в алгоритмах и программах ВАРИАНТ 4;Составьте блок-схему и программу вычисления значения функции
ВАРИАНТ 4 1. Составьте блок-схему и программу вычисления значения функции: 2. Составьте программу, определяющую остаток от...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами
8Observer8 20.02.2026
Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .
Конвертировать закладки 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. На борту пять. . .
Камера 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. Пошагово создадим проект для загрузки изображения. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru