#include
int main()
{
int a = 1;
for (int i = 1; i <= 100; i++)
{
if (i%2 == 0) a*=i;
}
cin.get();
return 0;
}
P. S. Dev C++ это не язык, это среда разработки, язык тут просто C++.
Свойство информации отражающее истинное положение дел это достоверность
Счет хоккейного матча относиться к числовой форме информации.
Очевидно, что букву "А" с буквой "Б" мы перепутать не можем, так как А состоит только из нулей, а Б только из единиц.
Буква "В" состоит из нулей и единиц, так что, казалось бы, ее можно декодировать неоднозначно, НО. Попробуем это сделать. Предположим, что мы перепутали первый 0 и думаем, что это А. Остаётся число 10. Которое уже никак не декодировать иначе.
Var x,y,z:longint;
begin
writeln(' TEST');
writeln(' выберите верный вариант ответа 1,2 или 3');
writeln(' сюда вбиваешь вопрос ');
writeln('1.сюда варианты ответов);
writeln('2.сюда варианты ответов);
writeln('3.сюда варианты ответов);
read(x);
if (x=номер верного варианта) then y:=y+1;
writeln(' сюда вбиваешь вопрос ');
writeln('1.сюда варианты ответов);
writeln('2.сюда варианты ответов);
writeln('3.сюда варианты ответов);
read(x);
if (x=номер верного варианта) then y:=y+1;
writeln(' сюда вбиваешь вопрос ');
writeln('1.сюда варианты ответов);
writeln('2.сюда варианты ответов);
writeln('3.сюда варианты ответов);
read(x);
if (x=номер верного варианта) then y:=y+1;
if (y=3)then write('ваша оценка 5');
if (y=2)then write('ваша оценка 3');
if (y=1)then write('ваша оценка 2');
end.
P.S.прошу проверить на ошибки а тест думаю вы и сами составите надеюсь всё правильно т.к. давно не работал на паскале