Если в блокноте ввести x=msgbox("Your Message Here", 5+16, "Your Title Here"), и сохранить этот файл в формате .vbs, какое высветится окошко?
Ответы на вопрос:
Первая строчка -- первое задание, вторая -- второе.
Пример работы:
1.
var arr: array[1..6] of integer;
var i, summ: integer;
begin
summ:= 0;
for i:=1 to 6 do
begin
readln(arr[i]);
end;
for i:=1 to 6 do
begin
if arr[i]>4 then
summ := summ+arr[i];
end;
writeln(summ);
end.
--------------------------------
var arr: array[1..7] of integer;
var i, mult: integer;
begin
mult:= 1;
for i:=1 to 7 do
begin
readln(arr[i]);
end;
for i:=1 to 7 do
begin
if arr[i]>0 then
mult := mult*arr[i];
end;
writeln(mult);
end.
----------------------------
Краткий гайд
i - переменная-счётчикarr - массив, с которым производятся операцииsumm - (в первом задании - переменная, отвечает за сумму элементовmult - (во второй части) отвечает за произведениесмотри вложение
я обязан написать минимум 20 символов чтобы отправить сообщение, поэтому я еще это пишу.
Объяснение:
Н и ч е г о
с л о ж н о г о
и
о п а с н о г о
м о ж е ш ь
п о п р о б о в а т ь
Популярно: Информатика
-
Skylordeg19.01.2022 09:41
-
Пепечка15.05.2022 11:02
-
ElenaAristova150109.09.2022 21:28
-
Ap4ik88827.07.2022 06:39
-
kostyaluch27.10.2021 17:23
-
belozerovanastya09.06.2022 02:36
-
vredina3412.03.2022 19:19
-
lidiyamartin913.04.2023 20:10
-
глупыйенот01.04.2023 02:36
-
Zhenkyaaaa14.08.2022 20:28