Запись if <условие> then <оператор> называется
Варианты ответов
полной формой условного оператора
неполной формой условного оператора
составным условием условием
Во Запись if <условие> then <оператор1>
else <оператор2>
называется
Варианты ответов
полной формой условного оператора
сокращенной формой условного оператора
составным условием условием
Во Составные условия строятся из с Варианты ответов
логических операций and, or, not
арифметических операций +, - , *
с операций and, or, not, +, - , *
Во Условие - это выражение, стоящее в операторе if после слова:
Варианты ответов
then
if
else
Во Если условие ложно, то:
Варианты ответов
выполняется то, что следует после then
выполняется то, что следует после else
выполняются оба оператора
Во Операторные скобки - это:
Варианты ответов
слова begin и end
слово begin
слово end
слово program
слово var
Во Логическая операция or - это:
Варианты ответов
логическое И
логическое ИЛИ
логическое отрицание
Во слово then переводится как-
Варианты ответов
если
то
иначе
для
пока
Во Что будет выведено на экран после следующего фрагмента программы:
x:=7;
y:=x+5;
if y>=x then writeln(y+x)
else writeln(y-x);
Во Что будет выведено на экран после следующего фрагмента программы:
у:=5;
х:=у-2;
if (x>y) and (x mod 2=0) then writeln(y+2*x)
else writeln(x+y*3);
Во Группа операторов, записанных между словами begin и end , называется:
Варианты ответов
составным оператором
операторными скобками условием
составным условием
Во Выберите условия, правильно записанные на языке Pascal:
Варианты ответов
s<0
e><0
x=y=z
f>=13
(x>9) and (x<100)
d=0
9
z+5
x1,x2>0
(y<=9) or (y>=100) больше нет
program raf105;
var n,m,i:integer;
begin
writeln('Введите диапазон чисел (2 числа через пробел) которые нужно возвести в квадрат');
readln(n,m);
writeln('Вывод:');
for i:=n to m do
writeln(i**2)
end.
2.program raf105;
var a,b,kol1,kol2:integer;
begin
write('Введите число: ');
readln(a);
while a <> 0 do
begin
b:= a mod 10;
if b<>0
then if (b mod 2)=0
then kol1+= 1
else kol2+= 1;
a:= a div 10;
end;
writeln('В числе ',kol1,' чётных и ',kol2,' нечётных цифр');
end.
3.program raf105;
var n,i,kol:integer;
begin
write('Введите N: ');
readln(n);
for i:=1 to n-1 do
if ((i mod 2)<>0) and ((i mod 3)<>0) and ((i mod 5)<>0)
then kol+=1;
writeln('Вывод: ',kol);
end.
Язык PascalABC
ответ: Проанализируем каждое число.
Число 1616 может быть результатом работы автомата, в этом случае исходное число могло быть 888.
Число 169 может быть результатом работы автомата, в этом случае исходное число могло быть 881.
Число 163 не может быть результатом работы автомата, поскольку в таком случае сумма среднего и старшего разрядов должна быть 16, а младшего и среднего — 3.
Число 1916 не может быть результатом работы автомата, поскольку нет таких цифр, сумма которых равна 19.
Число 1619 не может быть результатом работы автомата, поскольку числа записываются в порядке невозрастания.
Число 316 не может быть результатом работы автомата, поскольку числа записываются в порядке невозрастания, а число 31 невозможно получить сложением двух цифр.
Число 916 не может быть результатом работы автомата, поскольку числа записываются в порядке невозрастания.
Число 116 может быть результатом работы автомата,в этом случае исходное число могло быть 560.
ответ: 3.
Объяснение: