<span>var</span> n<span>,</span>p<span>:int</span>;
<span>begin</span>
<span>readln</span><span>(</span>n<span>)</span>;
p<span>:=</span><span>1</span>;
<span>while</span> p<n <span>do</span> p<span>:=</span>p<span>*</span><span>2</span>;
<span>if</span> p<span>=</span>n <span>then</span><span>write</span><span>(</span><span>'YES'</span><span>)</span><span>else</span><span>write</span><span>(</span><span>'NO'</span><span>)</span>;
<span>readln</span>;
<span>end</span>.
var a:array [1..10] of integer;
s,i,c,b:integer;
Begin
read(c,b,n);
randomize;
for i := 1 to n do
a[i]:= random(b) -c+1;
for i:= 1 to n do
if i mod 2 = 0 then s:=s+1;
writeln(s);
End.
#include <iostream>
#include <string>
using namespace std;
int main()
{
string st1, st2, st3;
cout <<"Введите первую строку: ";
getline(cin, st1);
cout <<"Введите вторую строку: ";
getline(cin, st2);
st3=st1+st2;
cout <<"Результат:" <<endl;
cout <<st3 <<endl;
return 0;
}
Вариант а) отпадает, так как в 1 строке получим произведение 7 единиц=1, а должно получиться 0
Вариант б) отпадает, так как1 строке получим сумму 7 единиц=1, а должно получиться 0
В варианте В) прошла 1 строка, получили в итоге 0, но не прошла вторая строка. Получается 1, а должно быть равно 0
Остается вариант Г)
Если подставить значения, то все строки прошли тест.
Ответ: Г
Задача будет выполняться при соблюдении условия. Необходимо вводить 2 числа. Это необходимо что бы определить, является ли число целым. (числа нужно вводить одинаковые.
var y,c:real;
a,b:integer;
begin
writeln('Введите 2 одинаковых числа');
readln(a,b);
c:=a/b;
if (a>b) or (a<b) then
y:=c/2
else
y:=c*10;
writeln(y);
<span>end.</span>