0 / 0 / 0
Регистрация: 16.12.2017
Сообщений: 37

Начертить Блок Схему по заданию с циклом пока/до. Написать программу

16.12.2017, 13:06. Показов 1974. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Начертить Блок Схему по заданию с циклом пока/до. Написать программу.
Найти результат вычисления арифметического выражения: Y=√x*Sin(x)/2, где x https://www.cyberforum.ru/cgi-bin/latex.cgi?\small \in [0,75:3] c шагом 0,2.
Вычислить все значения и найти количество элементов <0,1
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
16.12.2017, 13:06
Ответы с готовыми решениями:

Написать программу в Паскале и составить блок-схему по заданию: Вывести «столбиком» следующие числа: 2,2; 2,4; 2,6; …, 4,0; 4,2
Написать программу в Паскале и составить блок-схему по заданию: Вывести «столбиком» следующие числа: 2,2; 2,4; 2,6; …, 4,0; 4,2

Составить блок-схему и программу (с циклом с постусловием)
Дано натуральное число n Вычислить P=(1-1\2)(1-1\4)(1-1\6)...(1-1\2n)

Начертить Блок - схему
type mas=array of integer; const a:mas=(4,1,4,3,1,9,0); var b:mas; n,i,j,k:integer; begin n:=7; writeln('Исходный массив');...

2
Эксперт Pascal/Delphi
6811 / 4568 / 4819
Регистрация: 05.06.2014
Сообщений: 22,438
16.12.2017, 15:14
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
var
  x, y: real;
 
begin
  x := 0.75;
  while x <= 3 do
  begin
    y := Sqrt(x) * sin(x) / 2;
    writeln(x:8:2, y:8:2);
    x := x + 0.2;
  end;
end.
0
Модератор
10234 / 5522 / 3373
Регистрация: 17.08.2012
Сообщений: 16,881
16.12.2017, 15:56
Лучший ответ Сообщение было отмечено ZX Spectrum-128 как решение

Решение

ZX Spectrum-128, количество y<0.1 забыл найти.

Чуть поподробнее:



Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
const
  x0 = 0.75;
  xn = 3.0;
  dx = 0.2;
  fy = 0.1;
  hor = '+------+-------------+';
 
var
  x, y: real;
  k: integer;
 
begin
  x := x0;
  writeln(hor);
  writeln('|   x  |      y      |');
  writeln(hor);
  while x <= xn do
    begin
      y := sqrt(x) * sin(x) / 2;
      writeln('| ', x :4:2, ' | ', y :11:9, ' |');
      if y < fy then inc(k);
      x := x + dx
    end;
  writeln(hor);
  writeln('k = ', k);
  readln
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
16.12.2017, 15:56
Помогаю со студенческими работами здесь

Начертить блок схему по коду пргограммы
uses crt; procedure Find; var i: Integer; n1, n2: Integer; begin for i := 10 to 99 do begin ...

Начертить блок-схему для программы
type TVector = Array Of Byte; TArray = Array Of TVector; var a: TArray; b: TVector; i, j, n, m, k:...

Нужен Блок-Схему к етому заданию!!!
Квадраты крупнейших элементов строк матрицы!!!Вот так!=(

Составить блок-схему и программу вычисления значения функции + написать программу
Прошу решить в качестве проверки. Нужно сдать в понедельник. Буду очень благодарен! Заранее СПАСИБО!!! Номера: 7, 8, 17 (а)

Написать блок схему и программу
1)Написать блок схему и программу для вычисления суммы нечетных чисел от 1 до 100. 2)Написать блок схему и программу для вычисления...


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

Новые блоги и статьи
50 самых полезных примеров кода Python для частых задач
py-thonny 17.06.2025
Эффективность работы разработчика часто измеряется не количеством написаных строк, а скоростью решения задач. Готовые сниппеты значительно ускоряют разработку, помогают избежать типичных ошибок и. . .
C# и продвинутые приемы работы с БД
stackOverflow 17.06.2025
Каждый . NET разработчик рано или поздно сталкивается с ситуацией, когда привычные методы работы с базами данных превращаются в источник бессонных ночей. Я сам неоднократно попадал в такие ситуации,. . .
Angular: Вопросы и ответы на собеседовании
Reangularity 15.06.2025
Готовишься к техническому интервью по Angular? Я собрал самые распространенные вопросы, с которыми сталкиваются разработчики на собеседованиях в этом году. От базовых концепций до продвинутых. . .
Архитектура Onion в ASP.NET Core MVC
stackOverflow 15.06.2025
Что такое эта "луковая" архитектура? Термин предложил Джеффри Палермо (Jeffrey Palermo) в 2008 году, и с тех пор подход только набирал обороты. Суть проста - представьте себе лук с его. . .
Unity 4D
GameUnited 13.06.2025
Четырехмерное пространство. . . Звучит как что-то из научной фантастики, правда? Однако для меня, как разработчика со стажем в игровой индустрии, четвертое измерение давно перестало быть абстракцией из. . .
SSE (Server-Sent Events) в ASP.NET Core и .NET 10
UnmanagedCoder 13.06.2025
Кажется, Microsoft снова подкинула нам интересную фичу в новой версии фреймворка. Работая с превью . NET 10, я наткнулся на нативную поддержку Server-Sent Events (SSE) в ASP. NET Core Minimal APIs. Эта. . .
С днём независимости России!
Hrethgir 13.06.2025
Решил побеседовать, с утра праздничного дня, с LM о завоеваниях. То что она написала о народе, представителем которого я являюсь сам сначала возмутило меня, но дальше только смешило. Это чисто. . .
Лето вокруг.
kumehtar 13.06.2025
Лето вокруг. Наполненное бурями и ураганами событий. На фоне магии Жизни, священной и вечной, неумелой рукой человека рисуется панорама душевного непокоя. Странные серые краски проникают и. . .
Популярные LM модели ориентированы на увеличение затрат ресурсов пользователями сгенерированного кода (грязь -заслуги чистоплюев).
Hrethgir 12.06.2025
Вообще обратил внимание, что они генерируют код (впрочем так-же ориентированы разработчики чипов даже), чтобы пользователь их использующий уходил в тот или иной убыток. Это достаточно опытные модели,. . .
Топ10 библиотек C для квантовых вычислений
bytestream 12.06.2025
Квантовые вычисления - это та область, где теория встречается с практикой на границе наших знаний о физике. Пока большая часть шума вокруг квантовых компьютеров крутится вокруг языков высокого уровня. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru