решите плиз,лучшему дам еще 50 баллов
5-9 класс
|
Program z1;
var
a:array [1..50] of integer;
i,s,k:integer;
sr:real;
begin
for i:=1 to 50 do
a[i]:=random(98)+1;
for i:=1 to 50 do
if i=3 then
s:=s+a[i];
k:=k+1;
sr:=s/k;
writeln('Srednee=',sr);
end.
Program z2;
var
a:array [1..15] of integer;
i:integer;
begin
for i:=1 to 15 do
a[i]:=random(98)+1;
for i:=1 to 15 do
if (a[i] mod 5=0) then
write(i,' ');
end.
ну ты там скоро?
Если справедливость восторжествует, и удалят первое решение, то я напишу полностью 3 задачи ;)
Другие вопросы из категории
Выберите правильный ответ:
размеры полей страницы (не менее): правое - 30 мм (для замечаний преподавателя.)
верхнее нижнее левое по 20 мм.
Отступ первой строки : 8 - 12 мм одинаковый по всему тексту.
выравнивание абзаца по ширине.
интервал междустрочный полуторный.
гарнитура шрифта основного текста - Times Nev Roman или аналогичная.
кегль (размер) 12 - 14 пунктов.
заголовки разделов и подразделов следует размещать на отдельной строке с прописной буквы без точки в конце не подчёркивая. выравнивание по центру или по левому краю. интервал перед заголовком - 12 пунктов после - 6 пунктов. ЗАГОЛОВОК ПЕРВОЕ ПОКОЛЕНИЕ ЭВМ. И ВСЁ ЭТО НАДО СДЕЛАТЬ В ЭТОМ ДОКУМЕНТЕ.
Читайте также
1.Какое количество информации получит Миша после броска кубика с 16 гранями?
а) 4 бита
б) 8 бит
в) 16 бит
г) 32 бита
2. Играя в игру "Угадай слово" было получено 6 бит информации. Каково было количество возможных событий?
а) 6
б) 48
в) 64
г) 128
3. Маша переехала в новый многоэтажный дом, и сообщение о том что она живет на 24 этаже, несет 5 бит информации. Сколько этажей в доме????Заранее спасибо!!)))
помещаются 2 мальчика или 1 солдат. дам 50 баллов