Var a,b,n:integer;
begin
writeln('n=');
readln(n);
<span>a:=n mod 10;
b:=n div 10;
if (a= 4) or (b=4) or (a=7) or (b=7) then writeln('yes')
else
writeln('no');
readln;
end.
__________________________
</span>var a,b,n:integer;
begin
writeln('n=');
readln(n);
a:=n mod 10;
b:=n div 10;
if (a= 3) or (b=3) or (a=6) or (b=6) or (a=9) or (b=9)
then writeln('yes')
else
writeln('no');
readln;
end.
Program calculator;
Var a,c: real;
b: char;
Begin
Write('Введите первое число: ');
readln (a);
Write('Введите знак. ( + - сложение, - - вычитание, / - деление, * - умножение): ');
readln (b);
Write('Введите второе число: ');
readln (c);
case b of
'+': a:=a+c;
'-': a:=a-c;
'*': a:=a*c;
'/': a:=a/c;
end;
Write ('Результат: ',a);
End.
Ответ:
1.Голубой
2.Светло-зелёный
3.Розовый
4.Коричневый
Объяснение:
Проверено через программу TextEdit функции выбора цвета на Mac OS
Вправо
нц 3 раза
нц 3 раза
закрасить, вниз
кц
вправо
кц
5. б)Техническое описание компьютера.
Информационные модели делят в основном на 2 типа, это формальные и описательные. К формальным относят модели,которые сделаны на формальном,то есть специализированном или научном языке. Это схемы, формулы и прочее.Из всего перечня только это можно отнести к формальной модели.вариант В отброшен,так как там написано "рисунок..схемы", то есть не сама схема.
6. а)программы на языке программирования.
Здесь на мой взгляд ответ очевиден, но я поясню : только программа позволит из этого перечня охватить эксперимент в полной мере,так как в ней при желании можно видеть все расчеты,значения и следить за процессом эксперимента.