ответ: 2 ВАРИАНТ)
var
x:real;
begin
x:=(32+45)/(2+7);
writeln('x=',x:4:2);
readln;
end.
Объяснение:
1 ВАРИАНТ)
var
x:char;
begin
x:=(32+45)/(2+7);
writeln('x=',x:4:2);
readln;
end.
НЕ ПОДХОДИТ, Т.К. для x указан тип данных - символьный. var x:char;
2 ВАРИАНТ)
var
x:real;
begin
x:=(32+45)/(2+7);
writeln('x=',x:4:2);
readln;
end.
ПОДХОДИТ, Т.К. всё верно.
3 ВАРИАНТ)
var
x:real;
begin
x:=(32+45)/(2+7);
end.
НЕ ПОДХОДИТ, Т.К. программа не делает вывод ответа.
4 ВАРИАНТ)
var
x:real;
begin
x:=(32+45)*(2+7);
writeln('x=',x:4:2);
readln;
end.
НЕ ПОДХОДИТ, Т.К. допущена ошибка при записи уравнения. Указано умножение, вместо деления (32+45) * (2+7)
var n:integer;
f:boolean;
begin
f:=false;
repeat
write ('N = ');
readln (n);
until (n>=1000) and (n<=9999);
while (not f) and (n<>0) do
begin
if n mod 10 = 4 then f:=true;
n:=n div 10;
end;
if f then writeln ('YES') else writeln ('NO');
end.
C++:
#include <iostream>
using namespace std;
int main()
{
int n;
bool f = false;
while (n<1000 || n>9999)
{
cout <<"N = ";
cin >>n;
}
while (!f && n!=0)
{
if (n%10==4)
f = true;
}
if (f)
cout <<"YES" <<endl;
else cout <<"NO" <<endl;
return 0;
}