Задать вопрос
ИнформатикаИнформатика
22 ноября, 19:58

Найдите ошибки в следующих программах:

Program int_r;

Var a, x:integer;

b, c:real;

Begin

a:=10;

b:=5.2;

x:=b div 2;

c:=round (x) ;

End.

Program int_r1;

Var a, c:integer;

b, d:real;

Begin

a:=25;

b:=a/2;

c:=sqr (a) ;

d:=a mod 10;

End.

+4
Ответы (1)
  1. 22 ноября, 20:31
    0
    Program int_r;

    Var

    a, x:integer;

    b, c:real;

    readln

    a:=10;

    b:=5.2;

    Begin

    x:=b div 2;

    c:=round (x) ;

    End.

    (я так думаю, но не факт, что правильно!)

    Program int_r1;

    Var

    a, c:integer;

    b, d:real

    readnl

    a:=25;

    Begin

    b:=a/2;

    c:=sqr (a) ;

    d:=a mod 10;

    End.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Найдите ошибки в следующих программах: Program int_r; Var a, x:integer; b, c:real; Begin a:=10; b:=5.2; x:=b div 2; c:=round (x) ; End. ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы
Похожие вопросы по информатике
Определить значение выражения: 1) 10 div 15 2) 10 div 2 3) 10 mod 2 4) 10 mod 17 5) 123 mod 10 6) 123 div 10 7) 1 div 2 8) 123 mod 1000 9) 100 mod 27 div 3 10) 100 div 5 mod 3 11) 98725 div 1000 mod 10 12) 100 mod 5 div 3
Ответы (1)
Почему не выдает числа? uses crt; var i:integer; begin for i: = 100 to 999 do if i = ((sqr (i div 100) * (i div 100)) + ((sqr (i div 10) mod 10) * (i div 10) mod 10) + (sqr (i mod 10) * i mod 10)) then writeln (i) ; end.
Ответы (1)
Тест: Операторы целочисленной арифметики div и mod 1. Вычислите: 25 div 11 2.27 3 2 2. Вычислите: 64 div 9 1 7 6 3. Вычислите: (35 div 2) div 5 2 17 3 4. Вычислите: (78 div 5) mod 10 5 15 10 5. Вычислите: (25 mod 11) + (18 mod 7) 3 7 4 6.
Ответы (1)
Что напечатает следующая программа? program p3; var x, y:integer; procedure p1 (var a, b:integer) ; begin a:=sqr (a) ; b:=sqr (a) + a; end; procedure p2 (a, b:integer) ; begin a:=sqr (a) ; b:=sqr (b) + b; end; begin x:=2; y:=2; p1 (x, y) ;
Ответы (1)
Где здесь ошибка? program P12; uses crt; var a, b, c:real; i, n:integer; function F (x:real) : real; begin f:=sqr (sqr (x)) + (sqr (x)) * x-8*x (sqr (x)) + 5*x-3-cos (2*x) ; end; begin clrscr; a:=0; b:=1; n:=20; for i:=1 to n do begin c: = (a+B) / 2;
Ответы (1)
Помогите с ответом
С. Сахарнов "Летучая рыба"
Нет ответа
Объясните, почему уважение американцев к труду можно считать одной из причин подъёма экономики. 19 Век
Нет ответа
Сколько четвёртых и сколько восьмых долей единицы в данном числе 1/2, 1 1/2,2 1/4,
Нет ответа
Данные имена существительные поставь форме множественного числа и запиши пары слов обозначь в словах ту часть которая изменяется при изменении слова по числам
Нет ответа
Яркий солнечный день. светит ... дует ... а вокруг ... Слова для составления предложения. Пушистая, молодая, зеленая, мягкая, сочная, как бархатная зеленеет, словно раскинулся ковер Желтые поговки, яркие фонарики огоньки, маленькие солнышки Растут,
Нет ответа
Главная » Информатика » Найдите ошибки в следующих программах: Program int_r; Var a, x:integer; b, c:real; Begin a:=10; b:=5.2; x:=b div 2; c:=round (x) ; End. Program int_r1; Var a, c:integer; b, d:real; Begin a:=25; b:=a/2; c:=sqr (a) ; d:=a mod 10; End.
Регистрация Забыл пароль