
Домашние задания: Информатика
Нужны ответы по информатике на все задания срочно пожалуйста
Помогите пожалуйста срочно информатика!!!

Программу, значит, написать... - Это можно. Только вот на каком языке программирования это нужно сделать? - Нет, программе-то, конечно, без разницы, на каком языке программирования (а их (языков программирования) существует порядка 40) она написана, а вот учитель/преподаватель может спросить, с чего это программа была написана на этом языке программирования, а не на том, который он(а) преподает.
Вот, например, на Pascal:
Вот, например, на Pascal:
Program P3;
uses crt;
const n=3;
type bros=array [1..n] of integer;
var b: bros;
i: integer;
sr: real;
begin
clrscr;
sr:=0;
for i:=1 to n do b[i]:=random (5)+1;
write ('Выпало очков:');
for i:=1 to n do write (' ', b[i]);
writeln (' ');
for i:=1 to n do sr:=sr+b[i];
sr:=sr/n;
writeln ('Среднее значение выпавших очков: ', sr :0:2);
write ('Программа завершена. Для выхода нажмите клавишу Enter.');
readkey;
end.
Вот на Python: import random
n=3
sr=0
b=[random.randint (1, 6) for i in range (n)]
print (f"Выпали значения: {b} ")
for i in range (n):
sr=sr+b[i]
sr=sr/n
print (f"Среднее значение выпавших очков: {sr}")
Вот на C++: #include
#include
using namespace std;
int main()
{
const int n=3;
int i, b[n];
float sr;
sr=0;
srand (time (0));
for (i=0; i
Задача 4:
Var z, z1, z2, z3 : integer;
begin
z1 := 1 + random (6);
z2 := 1 + random (6);
z3 := 1 + random (6);
z := 100*z1+10*z2 + z3;
WriteLn (' Выпало: ');
Write (' ', z1, ' ',z2, ' ',z3);
WriteLn;
Writeln (' Число ',z);
Writeln (' и его квадрат: ', sqr(z));
end.
Var z, z1, z2, z3 : integer;
begin
z1 := 1 + random (6);
z2 := 1 + random (6);
z3 := 1 + random (6);
z := 100*z1+10*z2 + z3;
WriteLn (' Выпало: ');
Write (' ', z1, ' ',z2, ' ',z3);
WriteLn;
Writeln (' Число ',z);
Writeln (' и его квадрат: ', sqr(z));
end.

Похожие вопросы
- Помогите пожалуйста с информатикой!!!!
- Помогите пожалуйста с информатикой
- Помогите, пожалуйста, с информатикой
- Помогите, пожалуйста, с информатикой, паскаль
- Помогите, пожалуйста, с информатикой, паскаль.
- Помогите пожалуйста с информатикой
- Помогите пожалуйста с информатикой! (паскаль)
- Помогите пожалуйста с информатикой
- Ребят помогите пожалуйста с информатикой (Паскаль)
- Помогите пожалуйста с информатикой..