Олеся

30.06.2021

Привидите пример, результат тестового выполнения программы: Program Example:var I:integer;beginfor I:=1 to 10 dowrite (random (50):4)end.

Информатика

Ответить

Ответы

alisapavlushina

30.06.2021

Program Example:

var I:integer;

begin

for I:=1 to 10 do

write (random (50):4)

end.

Объяснение:

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Привидите пример, результат тестового выполнения программы: Program Example:var I:integer;beginfor I:=1 to 10 dowrite (random (50):4)end.

▲

Привидите пример, результат тестового выполнения программы: Program Example:var I:integer;beginfor I:=1 to 10 dowrite (random (50):4)end.

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

Популярные вопросы в разделе

Деление двоичных чисел 1011010/10010 покажите как делить столбиком

Как переписать программу, чтобы она заработала на pascal abc?

Как на язике phyton будет y=(корень квадратний) a2+b2-c2

В каком из условных операторов допущена ошибка? a) if b=0 then writeln ('Деление невозможно.'); б) if a в) if a>b then max:=a else max:=b; г ОТВЕТ С ПОДРОБНЫМ ОБЪЯСНЕНИЕМ

Как организована связь абонентов в сети?

Дано число. Если его куб больше 12, то найти и вывести квадрат всех чисел больше его и меньших 8.Составьте блок схему

При программировании какие системы счисления используются? а) все вычислительные системы используютсяб) только двоичный в) двоичный и десятичный

перевести с Паскаля на С++ program n; const n = 4; var i, j, k : integer; a : array[1..n, 1..n] of real; begin for i:=1 to n do begin for j:=1 to n do begin a[i][j]:=sin((ii + jj) / n); } write(...

Написати програму, яка виводить таблицю квадратів перших десяти цілих додатніх чисел. (паскаль)

Привидите пример, результат тестового выполнения программы: Program Example:var I:integer;beginfor I:=1 to 10 dowrite (random (50):4)end.​

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

Популярные вопросы в разделе

Деление двоичных чисел 1011010/10010 покажите как делить столбиком

Как переписать программу, чтобы она заработала на pascal abc? ​

Как на язике phyton будет y=(корень квадратний) a2+b2-c2

В каком из условных операторов допущена ошибка? a) if b=0 then writeln ('Деление невозможно.'); б) if a в) if a&gt;b then max:=a else max:=b; г ОТВЕТ С ПОДРОБНЫМ ОБЪЯСНЕНИЕМ

Как организована связь абонентов в сети?

Дано число. Если его куб больше 12, то найти и вывести квадрат всех чисел больше его и меньших 8.Составьте блок схему

При программировании какие системы счисления используются? а) все вычислительные системы используютсяб) только двоичный в) двоичный и десятичный

перевести с Паскаля на С++ program n; const n = 4; var i, j, k : integer; a : array[1..n, 1..n] of real; begin for i:=1 to n do begin for j:=1 to n do begin a[i][j]:=sin((i*i + j*j) / n); } write(...

Написати програму, яка виводить таблицю квадратів перших десяти цілих додатніх чисел. (паскаль)

Привидите пример, результат тестового выполнения программы: Program Example:var I:integer;beginfor I:=1 to 10 dowrite (random (50):4)end.

Как переписать программу, чтобы она заработала на pascal abc?

В каком из условных операторов допущена ошибка? a) if b=0 then writeln ('Деление невозможно.'); б) if a в) if a>b then max:=a else max:=b; г ОТВЕТ С ПОДРОБНЫМ ОБЪЯСНЕНИЕМ

перевести с Паскаля на С++ program n; const n = 4; var i, j, k : integer; a : array[1..n, 1..n] of real; begin for i:=1 to n do begin for j:=1 to n do begin a[i][j]:=sin((ii + jj) / n); } write(...