Меню

Встречено writeln а ожидалось как исправить ошибку

Vanokos9

0 / 0 / 0

Регистрация: 19.10.2015

Сообщений: 11

1

19.10.2015, 22:54. Показов 11319. Ответов 3

Метки нет (Все метки)

Pascal 
1
2
3
4
5
6
7
8
9
10
11

PROGRAM LVP;
VAR A:INTEGER;
B,x,y:READ;
BEGIN
WRITE('A= ');
READLN(A);
WRITE('B= ');READLN(B);
WRITE('x= ');READLN(x);
y:=ln(ABS(exp(3*ln(x-B))))*exp((1/3*ln(1+cos(exp(3*ln(x)))))*exp((5*SQR(A))*ln(2)))/5.5+(tan(SQR(B))*exp(3*ln(sin(x)))*SQRT(B)
WRITELN('y';y:6:2);
END.

Пишет что встречено ‘WRITELN’, а ожидалось ‘)’

__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь



0

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

 19.10.2015, 22:54

Ответы с готовыми решениями:

Встречено ‘Writeln’, а ожидалось ‘;’
Program Primer2;
Uses CRT;
var a,d,x:Real;
begin
Clrscr;
Writeln(‘Введите a:’);
Readln(a);…

Встречено ‘else’, а ожидалось ‘;’
type
matrix= array of integer;
var
a,x: matrix;
i,j,k,l: integer;
begin
for…

Ошибка: Встречено ‘;’, а ожидалось ‘)’
const
M = 10;
N = 20;
L = 1;
T1 = 1000;
D = 10;
Ro = 100;
nu = 1e-6;
deltat…

Ошибка- Встречено ‘zap’, а ожидалось begin
Помогите, пожалуйста, исправить.Должно появляться окно exe для записи данных о работниках-фамилия,…

3

volvo

Супер-модератор

Эксперт Pascal/DelphiАвтор FAQ

32444 / 20939 / 8104

Регистрация: 22.10.2011

Сообщений: 36,202

Записей в блоге: 7

19.10.2015, 22:58

2

Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal 
1
2
3
4
5
6
7
8
9
10
11

PROGRAM LVP;
VAR A:INTEGER;
B,x,y:REAL;
BEGIN
WRITE('A= ');
READLN(A);
WRITE('B= ');READLN(B);
WRITE('x= ');READLN(x);
y:=ln(ABS(exp(3*ln(x-B))))*exp((1/3*ln(1+cos(exp(3*ln(x)))))*exp((5*SQR(A))*ln(2)))/5.5+(tan(SQR(B))*exp(3*ln(sin(x)))*SQRT(B));
WRITELN('y ',y:6:2);
END.

Это компилируется, работоспособность не проверял



0

33 / 33 / 23

Регистрация: 16.04.2013

Сообщений: 212

19.10.2015, 22:59

3

Скобки правильно расставлены и на 9 строке не хватает ;



1

0 / 0 / 0

Регистрация: 19.10.2015

Сообщений: 11

21.10.2015, 22:14

 [ТС]

4

Спасибо огромное)



0

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

 21.10.2015, 22:14

Помогаю со студенческими работами здесь

Робота с файлами. Что за ошибка «Встречено ‘end’, а ожидалось ‘;'»?
program file_1;
uses crt;
var
f,fl:file of integer;
x,x_l,s,i:integer;
r:byte;
c:char;…

Встречено ‘until’, а ожидалось ‘;’
var x,y,u:real;
k,c:string;
code: integer;
begin
write(‘Введите x=’);
readln(k);…

Встречено ‘:’, а ожидалось ‘)’ а ожидался оператор
Встречено ‘:’, а ожидалось ‘)’ а ожидался оператор. Девятая строка.

var b,a,x,y:real;
begin…

Program1.pas(63) : Встречено ‘else’, а ожидалось ‘;’
var
a:array of integer;
st:array of integer;
rez:array of integer;
sum,i,j,k,x,s,n:integer;…

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

Или воспользуйтесь поиском по форуму:

4

Источник

  1. Ты написал вместо «begin» bedin. И за константу Pi брать не надо. В системе Pi уже есть, поэтому начальные значения ей давать не нужно. У тебя программа должна выглядеть вот так:

    program n_2;

    var r, c, s: real;

    begin

    writeln (‘Вычисление длины окружности и площади круга’) ;

    write (‘Введите r>>’) ;

    readln (r) ;

    c: = 2*pi*r;

    s:=pi*r*r;

    writeln (‘c=’, c:6:4) ;

    writeln (‘s=’, s:6:4)

    end.

    • Комментировать
    • Жалоба
    • Ссылка

Найдите правильный ответ на вопрос ✅ «Почему паскаль abc выдает ошибку Встречено ‘writeln’, а ожидалось ‘:’ program n_2; const pi=3.14; var r, c, s: real; bedin writeln …» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.

Смотреть другие ответы

Новые вопросы по информатике

Главная » ⭐️ Информатика » Почему паскаль abc выдает ошибку Встречено ‘writeln’, а ожидалось ‘:’ program n_2; const pi=3.14; var r, c, s: real; bedin writeln (‘Вычисление длины окружности и площади круга’) ; write (‘Введите r>>’) ; readln (r) ; c: = 2*pi*r; s:=pi*r*r;

Источник

logo

    • Предмет:

      Информатика

    • Автор:

      aydancarney250

    • Создано:

      3 года назад

    Ответы

    Знаешь ответ? Добавь его сюда!

  • matematika
    Математика

    15 минут назад

    Петя посчитал вслух от 1 до 1000000 один два три миллион сколько раз он сказал слово двенадцать. Помогите решить пожалу

  • obshtestvoznanie
    Обществознание

    25 минут назад

    Помогите пж! — РЕАЛИЗАЦИЯ ПРАВА НА ОБРАЗОВАНИЕ В РОССИИ.

  • geografiya
    География

    30 минут назад

    Каково влияние воздушной циркуляции на температурный режим и сезонность выпадения осадков?

  • geografiya
    География

    35 минут назад

    Помогите с географией СРОЧНО!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

  • geografiya
    География

    40 минут назад

    Два примера стран в Европе, занимающих глубинное положение

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.

Вы не можете общаться в чате, вы забанены.

Чтобы общаться в чате подтвердите вашу почту
Отправить письмо повторно

Вопросы без ответа

  • matematika
    Математика

    4 часа назад

    Помогите пожалуйста Английский язык 🙏🏼🙏🏼🙏🏼

  • fizika
    Физика

    9 часов назад

    Помогите с физикой -https://n.fcd.su/Luv

Топ пользователей

  • avatar

    Fedoseewa27

    22808

  • avatar

    Sofka

    7419

  • avatar

    zlatikaziatik

    5659

  • avatar

    vov4ik329

    5111

  • avatar

    DobriyChelovek

    4625

  • avatar

    olpopovich

    3461

  • avatar

    TheDenty

    3258

  • avatar

    dobriykaban

    2540

  • avatar

    Udachnick

    1867

  • avatar

    ViktoriaBell0

    1740

Войти через Google

или

Запомнить меня

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

Выберите язык и регион

Русский

Россия

English

United States

zoom

How much to ban the user?

1 hour
1 day

Источник
program PR3;
const a=1.5; p=3.14;
var a,x,y: real;
begin
  writeln('Введите x: ');
  read(x);
    if x<1.3 then
    begin
     y=p*sqr(x)-7/sqr(x); {Здесь ошибка}
     writeln('y= ', y);
      if x=1.3 then 
      begin
       y=a*exp(ln(X)*3)+7sqrt(x); {здесь так же пишет ошибку}
       writeln('y= ');
        if x>1.3 then 
        begin
         y=log(x+7*sqrt(x); {здесь так же если убрать предыдущие}
         writeln('y= ');
      end;
    end;
  end;
end.

Выдаёт ошибку Встречено ‘=’, а ожидалось ‘;’ при каждом «=»

задан 26 мая 2021 в 17:59

Элендер's user avatar

2

if SameValue(x, 1.3) then 
begin
  ...
end
else if x < 1.3 then
begin
  y := p * sqr(x) - 7 / sqr(x);
  writeln('y= ', y);
end
else if x > 1.3 then
begin
  ...
end;

ответ дан 26 мая 2021 в 19:43

Источник

0 0 голоса
Рейтинг статьи
Подписаться
Уведомить о
guest

0 комментариев
Старые
Новые Популярные
Межтекстовые Отзывы
Посмотреть все комментарии

А вот еще интересные материалы:

  • Яшка сломя голову остановился исправьте ошибки
  • Ясность цели позволяет целеустремленно добиваться намеченного исправьте ошибки
  • Ясность цели позволяет целеустремленно добиваться намеченного где ошибка
  • Встречающиеся ошибки при выполнении приема поглаживания
  • Встреча состоится у памятника пушкина речевая ошибка

    • ➤