Категория
Информатика, опубликовано 19.02.2019 17:40

Решить в паскале авс вывести на экран 10 случайных чисел из диапазона от 1 до 9 (включительно)

Ответы

Ответ
Ответ оставил: Гость
Program qq; var a,i: integer; begin for i: =1 to 10 do    begin   a: =random(9)+1;   writeln(a);   end; end.
Ответ
Ответ оставил: Гость
8 бит = 1 байт, 16 бит = 2 байта
x - длина сообщения
2*x-1*x=2048 (байт)
x=2048 
Первоначальный объем
1*2048=2048 (байт) = 2048/1024 (Кбайт) = 2 Кбайта
Ответ
Ответ оставил: Гость
/*VS C++*/
#include <iostream>
#include <math.h>
using namespace std;
int main() {
    float x, y, h;
    cout << "Vvedite x = "; cin >> x;
    cout << "Vvedite y = "; cin >> y;
    if (x < y) h = atan(x + fabs(y));
    if (x > y) h = atan(fabs(x) + y);
    if (x == y) h = pow((x + y), 2);
    cout << "h = " << h << endl;
    system("pause");
    return 0;
}
Ответ
Ответ оставил: Гость
1)
var sum, m, k: integer;
begin

sum := 0;
m := -10;

for k:=1 to 20 do
begin

if m mod 2 = 0 then
sum := sum + m;

m = m + 1;
end;

end.

2)
var sum, m, k: integer;
begin

proizv := 1;
m := -10;

for k:=1 to 20 do
begin

proizv := proizv + m;
m = m + 1;

end;

end.


Другие вопросы по информатике

Вопрос
Информатика, опубликовано 09.01.2019 16:01
Вопрос
Информатика, опубликовано 09.01.2019 16:01
✅ Ответов: 3 на вопрос по информатике: Решить в паскале авс вывести на экран 10 случайных чисел из диапазона от 1 до 9 (включительно)... ты найдешь на сайте. Также ты можешь добавить свой вариант ответа, если считаешь, что он не верен или твой ответ более полный. Пожалуйста, добавляй только правильные ответы.
Вконтакте Youtube