-
Надо склать твой как я провел свой выходной
-
Предмет:
Українська мова -
Автор:
harleyatkinson - 6 лет назад
-
Ответы 1
-
Ну проснулся, позавтракал, сделал уроки, убрал в комнате, погулял на улице, сходил за хлебом, пообедал, покрутил телек, поужинал и спать.
-
Автор:
marcelo - 6 лет назад
-
0
-
-
Добавить свой ответ
Еще вопросы
-
асса хлорида натрия в 200 г 40% раствора равна
-
Предмет:
Химия -
Автор:
boosterw51f - 6 лет назад
-
Ответов:
1 -
Смотреть
-
-
оле-лукойе ка
ждый вечер рассказывал мальчику Яльмару интересные истории .Придумай для каждой истории название-
Предмет:
Литература -
Автор:
alana - 6 лет назад
-
Ответов:
2 -
Смотреть
-
-
найти вероятность того что число состоит из одинаковых чисел
-
Предмет:
Математика -
Автор:
gus94 - 6 лет назад
-
Ответов:
1 -
Смотреть
-
-
ПОМОГИТЕ ПОЖАЛАУЙСТА!!!!!!!!!!
35. B 4 № 691. В таблице Ves хранятся данные о весе в килограммах по группе учащихся спортивной школы (Ves[1] —
вес первого учащегося, Ves[2] — вес второго учащегося и т. д.). Определите, что будет напечатано в результате
выполнения следующего алгоритма, записанного на трёх алгоритмических языках:
Алгоритмический язык Бейсик Паскаль
алг
нач
целтаб Ves [1:14]
цел i, n
Ves[1]:= 25; Ves[2]:= 21;
Ves[3]:= 23; Ves[4]:= 28;
Ves[5]:= 30; Ves[6]:= 25;
Ves[7]:= 31; Ves[8]:= 28;
Ves[9]:= 25; Ves[10]:= 28;
Ves[11]:= 30; Ves[12]:= 27;
Ves[13]:= 26; Ves[14]:= 24;
n := 0
нц для к от 1 до 14
если Ves[i] > 26 то
n : = n + 1
все
КЦ
вывод n
КОН
DIS Ves(14) AS INTEGER
DIS i,n AS INTEGER
Ves(1)= 25: Ves(2)= 21
Ves(3)= 23: Ves(4)= 28
Ves(5)= 30: Ves(6)= 25
Ves(7)= 31: Ves(8)= 28
Ves(9)= 25: Ves(10)= 28
Ves(11)= 30: Ves(12)= 27
Ves(13)= 26: Ves(14)= 24
n = 0
FOR i = 1 TO 14
IF Ves(i) > 26 THEN
n : = n + 1
END IF
NEXT i
PRINT n
Var i, n: integer;
Ves: array[1..14] of integer;
Begin
Ves[1]:= 25; Ves[2]:= 21;
Ves[3]:= 23; Ves[4]:= 28;
Ves[5]:= 30; Ves[6]:= 25;
Ves[7]:= 31; Ves[8]:= 28;
Ves[9]:= 25; Ves[10]:= 28;
Ves[11]:= 30; Ves[12]:= 27;
Ves[13]:= 26; Ves[14]:= 24;
n := 0;
For i := 1 to 14 Do
If Ves[i] > 26 Then
Begin
n : = n + 1;
End;
Writeln(n)
End.-
Предмет:
Информатика -
Автор:
rolandowyatt - 6 лет назад
-
Ответов:
1 -
Смотреть
-
Топ пользователей
-
Fedoseewa27
35934 -
Askold
2792 -
Pikachu
2228 -
hobbesbowers
2116 -
kaylynnbarron676
1818 -
女fei
1240 -
yulia-kaplina
1158 -
Poinntt
946 -
Bars
930 -
Queenmagic18
770
How much to ban the user?
1 hour
1 day
100 years