Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
1 / 1 / 0
Регистрация: 19.01.2016
Сообщений: 16
1

Не пойму в чем ошибка, вроде все просто, но не работает

15.06.2018, 18:50. Просмотров 452. Ответов 8
Метки нет (Все метки)


Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
var
 x,y,i:real;
 
begin
i := 0;
x := 3;
y := -2;
readln(x);
   
if x > 0 then
             begin
               y := 5;
             end;
//[B]Ругается на эту строку, не пойму, что не так[/B]
if ((x>-7) and (x<=-3)) then y:= sqrt(4-sqr(x));
 
writeln('otvet = ',y);
 
end.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
15.06.2018, 18:50
Ответы с готовыми решениями:

Не пойму ,в чём ошибка . Всё компилируется
Я создал функцию поиска по заданном ключу , ключ вводится с клавиатуры . int Poisk(int *arr,int...

Вроде всё легко, но происходит ошибка. В чём дело?
import discord from discord.ext import commands from discord.ext.command import Bot Bot =...

Не пойму в чем ошибка.как не смотрел , все правильно
Допустим, нужно найти среднее арифм. чисел которые заканчиваются на 4 в интервале от 1 до 100...

вроде все просто
#include &quot;stdafx.h&quot; #include &lt;iostream&gt; #include &lt;ctime&gt; using namespace std; int main() {...

8
Aimez-vous les baguettes?
192 / 25 / 27
Регистрация: 25.10.2017
Сообщений: 165
15.06.2018, 19:37 2
Вы бы хоть скинули, как интерпретатор "ругается". При вводе случайных данных (однозначных и двузначных) у меня всё в штатном режиме, а в Вашей 14 строке нет кода, хотя написано ,что на неё и ругается.
0
Модератор
62889 / 46923 / 32340
Регистрация: 18.05.2008
Сообщений: 113,706
15.06.2018, 20:04 3
Цитата Сообщение от Doger11132 Посмотреть сообщение
if ((x>-7) and (x<=-3)) then y:= sqrt(4-sqr(x));
Если например х=-6, то 4-х*х<0, корень не определен
0
1 / 1 / 0
Регистрация: 19.01.2016
Сообщений: 16
15.06.2018, 20:14  [ТС] 4
Puporev, да, как это можно исправить?
0
Модератор
62889 / 46923 / 32340
Регистрация: 18.05.2008
Сообщений: 113,706
15.06.2018, 20:24 5
Это или формулу неправильно написали или в задании опечатка, задание же секретное.
,
0
1 / 1 / 0
Регистрация: 19.01.2016
Сообщений: 16
15.06.2018, 22:01  [ТС] 6
Нету задания, это формула окружности, выражение y через Х и радиус. Формула вроде бы правильная
0
Модератор
62889 / 46923 / 32340
Регистрация: 18.05.2008
Сообщений: 113,706
15.06.2018, 22:06 7
Цитата Сообщение от Doger11132 Посмотреть сообщение
Нету задания,
Ну нету, значит и ответа нету.
Цитата Сообщение от Doger11132 Посмотреть сообщение
Формула вроде бы правильная
Формула чего? Задания же нет.
0
1 / 1 / 0
Регистрация: 19.01.2016
Сообщений: 16
15.06.2018, 22:13  [ТС] 8
Формула окружности, я же сказал
Мне не нужен правильный ответ задания или решения, мне просто нужно исправить ошибку
0
151 / 143 / 87
Регистрация: 13.06.2018
Сообщений: 625
16.06.2018, 09:03 9
Pascal
1
if (x>-7) and (x<=-3) then y:= sqrt(4-sqr(x+5));
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
16.06.2018, 09:03

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь или здесь.

Вроде-бы все просто, но путаюсь с константыми методами
В чем разница где поставить модификатор const const void Metod(); void Method()const; В каком...

Нужно разобраться ,не могу понять в чём ошибка, вроде всё правильно(условие задачи:на фотке вложенной, 5 сверху)!
type mass = array of Integer ; TForm1 = class(TForm) lbl1: TLabel; lbl2: TLabel; ...

На цикл Пока - вроде все просто, а что-то не врублюсь
Вычислить сумму 1/3-5/7+7/9-9/11+... Число слагаемых задаётся с клавиатуры. Общей формулы нет, её...

HTML-форма, вроде просто, а вроде и нет
Уважаемые форумчане, помогите пожалуйста! Есть HTML-таблица с формой:...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.