Pascal - Написать простой калькулятор
1 Написать программу на языке Pascal, которая будет выполнять четыре алгоритмических действия с двумя введенными с клавиатуры числами и продемонстрирует результат на экране
2 Напишите программу на языке Pascal, которая находит значение выражения: y=(36+24)^2/Корень(8-5)
2 Напишите программу на языке Pascal, которая находит значение выражения: y=(36+24)^2/Корень(8-5)
Что именно у вас не получается?
Цитата: mike
Что именно у вас не получается?
Это опять студент, который ни хрена не понимает и понимать не хочет.
Код:
Program HelloWorld(output);
var
a,b,c : real;
begin
Write('a = ');
Readln(a);
Write('b = ');
Readln(b);
c := a+b;
Writeln('a + b = ',c);
c := a-b;
Writeln('a - b = ',c);
c := a*b;
Writeln('a * b = ',c);
c := a/b;
Writeln('a / b = ',c);
Writeln('---------------');
c := Sqr(36 + 24)/Sqrt(8-5);
Writeln(c);
end.
var
a,b,c : real;
begin
Write('a = ');
Readln(a);
Write('b = ');
Readln(b);
c := a+b;
Writeln('a + b = ',c);
c := a-b;
Writeln('a - b = ',c);
c := a*b;
Writeln('a * b = ',c);
c := a/b;
Writeln('a / b = ',c);
Writeln('---------------');
c := Sqr(36 + 24)/Sqrt(8-5);
Writeln(c);
end.
Readln в конце добавь, а то голову сломает, почему не работает
