Введите на языке pascal. программа предлагает вычислить выражение (5*8) - 2*4 и ввести ответ с клавиатуры. если ответ верен, то вывести на экран фразу "правильно", иначе - вывести "ты ошибся"
Var n: integer; begin write('Вычислите выражение (5*8)-2*4 = '); readln(n); if ((5*8)-2*4) = n then writeln('Правильно!') else writeln('Ты ошибся.'); end.
Var a:integer; begin; writeln('вычислите : 5*8-2*4 , что у вас получилось?'); readln(a); if a=32 do writeln('правильно') else writeln('ты ошибся'); end.
begin
write('Вычислите выражение (5*8)-2*4 = ');
readln(n);
if ((5*8)-2*4) = n then
writeln('Правильно!')
else
writeln('Ты ошибся.');
end.
begin;
writeln('вычислите : 5*8-2*4 , что у вас получилось?');
readln(a);
if a=32 do
writeln('правильно')
else writeln('ты ошибся');
end.