Определите, что будет напечатано в результате работы следующей программы: Var s,k: integer;
Begin
s:=0;
for k:=5 to 10 do
s:=s+12;
write(s);
End.
257
300
Ответы на вопрос:
Цикл выполнится 6 раз.
К s 6 раз прибавится 12.
6 * 12 = 72
ответ: На экран будет выведено число 72
Var x,y,a,b: string; i: integer; begin readln(x); readln(y); for i: =1 to length(x) do if pos(x[i],y)=0 then a: =a+x[i]; for i: =1 to length(y) do if pos(y[i],x)=0 then b: =b+y[i]; writeln(a); writeln(b); end.
Популярно: Информатика
-
missis23ashikhmina05.09.2022 16:22
-
ksyu555114.05.2022 00:15
-
maksdodaruk117.04.2023 03:01
-
brody9608.06.2023 11:58
-
ola12415.03.2022 02:53
-
liakjv55421115.05.2021 01:28
-
Лилиана431221.10.2020 12:34
-
ROMA70613.05.2020 17:43
-
Файрома01.07.2022 22:24
-
ban2005040814.11.2021 13:06