Задать вопрос
2 мая, 01:50

Как сделать в Паскале, чтобы выводилось значение переменной, а не сама переменная (например, не Х, а его значение). Вот моя прога:var

a: real;

b:real;

Begin

Writeln ('Квадратный корень какого числа нужно найти?') ;

readln (a) ;

b: = Sqrt (a) ;

Writeln ('Корень от числа (a) равен (b) ') ;

End.

Где написано (a), нужно чтобы было значения 'a', а не сама буква; с 'b' соответственно.

+1
Ответы (1)
  1. 2 мая, 02:52
    0
    Var

    a: real;

    b:real;

    Begin

    Writeln ('Квадратный корень какого числа нужно найти?') ;

    readln (a) ;

    b: = Sqrt (a) ;

    Writeln ('Корень от числа ', a, ' равен:', b) ;

    End.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Как сделать в Паскале, чтобы выводилось значение переменной, а не сама переменная (например, не Х, а его значение). Вот моя прога:var a: ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Сделать так чтобы Writeln был заменен другим словом и повторялься не больше двух раз program choise; var N_M:integer; writeln (' введи номер месяца ') ; readln (N_M) ; case N_M of 1:writeln (' январь ') ; 2:writeln (' февраль ') ;
Ответы (1)
Запиши программу в Паскале для вычисления площади прямоугольника со сторонами c и m. 1) begin writeln ('Введи длину и ширину прямоугольника c и m') ; readln (c, m) ; s:=c*m; writeln ('s=', s) ; readln; end.
Ответы (1)
Что я неправильно написал? var a, b, c, d: real; begin writeln (' введи число a') ; readln (a) ; writeln ('введи число b') ; readln (b) ; writeln ('введи число c') ; readln (c) ; d:=a; a:=c; writeln (a) ; c:=b; writeln (c) ; b:=d; writeln (b) ; end.
Ответы (1)
Где здесь ошибка program n_11; var a, b, c:Real; var d:Real; var x, x1, x2:Real; begin WriteLn ('Расширение квадратного уровнения') ; Write ('Введите коофиценты a, b, c >>') ; ReadLn (a, b, c,) ; d:=b*b-4*a*c;
Ответы (1)
Program zadacha3; var x, y : real; rez : char; begin write ('x=') ; readln (x) ; write ('y=') ; readln (y) ; write ('Введите число') ; readln (rez) ; case rez of '1' : writeln ('x+y=', x+y) ; '2' : writeln ('x-y=', x-y) ;
Ответы (1)