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

Исправьте ошибку!

22.09.2009, 14:00. Показов 2773. Ответов 20
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Всем привет , посмотрите что не так, 207 ошибку выдает.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Program Zadanie;
Var w,y,x,b,a:real;
Begin;
Writeln('BBDuTe a');
Readln(a);
Writeln('BBeDuTe b');
Readln(b);
writeln('BBeDuTe x');
Readln(x);
w:=(sqrt(x*x+b))-(b*b*exp(3+ln(sin(x+a))))/x;
y:=sqr(x*x*x)-(x/(sqrt(a*a+b*b)));
Writeln('w=', w:10:5);
Readln(w);
Writeln('y=', w:10:5);
Readln(y);
end.
и еще помогите, нужно имитировать работу микрокалькулятора для арифметических операций: сложения (+), вычитания (-), умножения (*), деления (/).
=)
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
22.09.2009, 14:00
Ответы с готовыми решениями:

исправьте ошибку
program dvoichnyi; uses crt; var i:integer; a:array of integer; b:array of string; s,d:string; k:integer; begin clrscr; ...

Исправьте ошибку
Program Z; Var z1, z2, x:real; Begin Writeln('BBeDuTE x'); Readln(x); ...

исправьте ошибку
Если в матрице А нет элементов модуль которых отличается от заданной величины Р менее, чем на заданную величину Е, найти для каждой ее...

20
21 / 21 / 2
Регистрация: 29.06.2009
Сообщений: 283
22.09.2009, 15:16
Студворк — интернет-сервис помощи студентам
Цитата Сообщение от Давид Посмотреть сообщение
Это изночально потомучто ваш вариант был...и он действительно не верен...нам не 3sin дается....а синус третьей степени!
а ну да, немного не доглядел и быстро исправил.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
22.09.2009, 15:16
Помогаю со студенческими работами здесь

Исправьте ошибку
program notebook; USES CRT; type NOTE = record fam:string; im:string; telefon:string; god:array of word; end; const n=1;

исправьте ошибку
исправьте ошибку - не может найти указанный путь. И вообще эта программа считается базой данных? program Phonebook; uses Crt; type...

Исправьте ошибку пожалуйста!
Unit Perevod; INTERFACE function per10_2(x:longint):string; function per10_8(x:longint):string; function...

Исправьте ошибку,за ранее спасибо!
Дано действительное число х, натуральное число n. Вычислить: пример x^1/1!+x^2/2!+x^3/3!+⋯+x^n/n! Program; var ...

Побочная диагональ и нули. Исправьте ошибку.
Не могу понять почему не работает прога. Условие: должна читать из тескстового файла массив, лепить из него матрицу, вывести на экран...


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

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

Новые блоги и статьи
Гайд, как ворваться в вайб-кодинг в мае 2026
Noname2331 17.05.2026
Простите за получившееся полотно текста, я даже не знаю, как его разбить на главы. Тут, что называется, ни добавить ни убавить, одна сцена одним дублем. На моих глазах недавно случилось чудо. Как. . .
[golang] Алгоритм «Хак Госпера»
alhaos 17.05.2026
Алгоритм «Хак Госпера» Хак Госпера (Gosper's Hack) — алгоритм нахождения следующего по величине числа с тем же количеством установленных бит. Придуман Биллом Госпером в 1970-х, опубликован в. . .
Рисование бинарного древа до 6-го колена на js, svg.
russiannick 17.05.2026
<svg width="335" height="240" viewBox="0 0 335 240" fill="#e5e1bb"> <style> <!]> </ style> <g id="bush"> </ g> </ svg> function fn(){ let rost;/ / высота древа let xx=165,yy=210,w=256;
FSharp: interface of module
DevAlt 16.05.2026
Интерфейс модуля F# позволяет управлять доступностью членов, содержащихся в реализации модуля. По-умолчанию все члены модуля доступны: module Foo let x = 10 let boo () = printfn "boo" . . .
Хитросплетение родственных связей пантеона греческих богов.
russiannick 14.05.2026
Однооконник, позволяющий узреть и изучить отдельных героев древней Греции. <!DOCTYPE html> <html lang="ru"> <head> <meta charset="UTF-8"> <meta http-equiv="X-UA-Compatible". . .
[golang] Угол между стрелками часов
alhaos 12.05.2026
По заданным значениям часа и минуты необходимо определить значение меньшего угла между стрелками аналогового циферблата часов. import "math" func angleClock(hour int, minutes int) float64 { . . .
Debian 13: Установка Lazarus QT5
ВитГо 09.05.2026
Эта инструкция моя компиляция инструкций volvo https:/ / www. cyberforum. ru/ blogs/ 203668/ 10753. html и его же старой инструкции по установке Lazarus с gtk2. . .
Нейросеть на алгоритме "эстафета хвоста" как перспектива.
Hrethgir 06.05.2026
На десерт, когда запущу сервер. Статья тут https:/ / habr. com/ ru/ articles/ 1030914/ . Автор я сам, нейросеть только помогает в вопросах которые мне не известны - не знаю людей которые знали-бы. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru