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

Составить блок схему для текста программы Pascal

12.12.2014, 00:10. Показов 1235. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Дано: x и y. Вычислить z=x2-5xy+tg y, если y≠0. Если y=0, выдать сообщение «y=0». Если z<10, и напечатать b=12y+ex+5. Если z≥10, вычислить и напечатать c=x2+y2-17,5.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Program semestrovaya1;
var x,y,z,b,c:real;
begin
  cls;
  writeln('Введите x, y:');
  readln(x,y);
  if y <> 0 then
  begin
    z := x * x - 5 * x * y + sin(y) / cos(y);
    writeln('z = ', z:0:3);
    if z < 10 then
    begin
      b := 12 * y + exp(x) + 5;
      writeln('b = ', b:0:3)
    end
    else begin
      c := x * x + y * y - 17.5;
      writeln('c = ', c:0:3)
    end
  end
  else writeln('y = 0')
end.
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
12.12.2014, 00:10
Ответы с готовыми решениями:

Составить блок схему для текста программы на pascal
Ввести одномерный массив A из 14 элементов. Определить в нём произведение элементов, квадрат которых меньше 16. Program lab5; const...

Составить блок схему для текста программы Pascal
Ввести одномерный массив A из N элементов. Каждый элемент в массиве больший 7 домножить на результат целочисленного деления этого ...

Составить блок схему для текста программы Pascal
Задан одномерный массив А(N) (N&lt;=60). На место минимального элемента массива записать сумму последних К элементов массива. Если А &gt;=0,...

1
696 / 570 / 414
Регистрация: 31.03.2013
Сообщений: 1,029
12.12.2014, 10:42
oleg20132110,
Миниатюры
Составить блок схему для текста программы Pascal  
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
12.12.2014, 10:42
Помогаю со студенческими работами здесь

Составить блок схему для текста программы Pascal
Вычислить и вывести на печать значения функции σ=7.14*tg2(2*x) где x∈ с Δx=0,5. Program semestrovaya2; Var y,x:real; Begin cls; ...

Составить блок-схему для задачи на Pascal
Не получается составить блок-схему для программы. Подскажите, как её составить.

Составить блок-схему для программы
Помогите составить блок-схему для задачи. Задача58. Для данного вещественного х найти значение следующей функции f, принимающей...

Составить блок-схему для программы
var s:string; c:char; begin writeln('Введите строку'); readln(s); for var i:=1 to length(s) div 2 do begin c:=s; ...

Составить блок схему для программы


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Установка Qt-версии Lazarus IDE в Debian Trixie Xfce
volvo 10.02.2026
В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .
SDL3 для Web (WebAssembly): Работа со звуком через SDL3_mixer
8Observer8 08.02.2026
Содержание блога Пошагово создадим проект для загрузки звукового файла и воспроизведения звука с помощью библиотеки SDL3_mixer. Звук будет воспроизводиться по клику мышки по холсту на Desktop и по. . .
SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств
8Observer8 07.02.2026
Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве
8Observer8 02.02.2026
Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .
Философия технологии
iceja 01.02.2026
На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .
SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf
8Observer8 01.02.2026
Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .
SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли
8Observer8 30.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm
8Observer8 30.01.2026
Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru