Какое значение примет переменная Е в результате выполнения программы: var L, K, Е: integer;
begin
L:=4;
K:=20-sqr(L);
if K>2*L Then L:=4;
if K<2*L Then L:=7;
if K=2*L Then L:=K-L;
Е:=L-K+L*K;
writeln (`Е=`, Е);
end.
124
365
Ответы на вопрос:
Program p1; var i: integer; a: array[1..10] of integer; begin for i: =1 to 10 do begin writeln('введите ',i,' число: '); read(a[i]); end; for i: =1 to 10 do if (a[i] mod 3)=0 then writeln('число: ',a[i]); end.
Популярно: Информатика
-
знаниепуть07.04.2021 14:14
-
743299902.06.2022 07:32
-
Kasha2633603.05.2020 04:12
-
DjYuLiAnNa22.06.2020 22:23
-
hellllo04.02.2020 02:17
-
katyanosa17.04.2020 19:39
-
anyutra14.08.2022 04:50
-
dianamihalenko908.06.2020 09:06
-
themac918.12.2020 05:39
-
k1llerospace03.11.2020 19:07