4 года назад

Напишите программу которая выводит на экран таблицу степеней тройки (от нулевой до десятой)

1 ответ:

nEmO951 [1]4 года назад

0 0

//PascalABC.NET
//Версия 3.3, сборка 1634
begin
var i:=0;
range(0,10).Select(x->3**x).ForEach(t->begin writeln(i,' ',t); inc(i); end);
end.

Читайте также

На рабочем столе размещаются небольшие картинки объектов: ____________ и _____________ (картинки с небольшими стрелочками в лев

Аманда Кларк [753]

На рабочем столе размещаются небольшие картинки объектов: значки и ярлыки.

0 0

4 года назад

5) в последовательности из n вещественных чисел определить наибольший элемент последовательности 3)вычислить сумму нечетных чисе

ser29 [11]

// PascalABC.NET 3.3, сборка 1579 от 18.11.2017
// Внимание! Если программа не работает, обновите версию!

5)
begin
Writeln('Max=',ReadSeqReal('Введите числа:',ReadInteger('n=')).Max)
end.

Пример
n= 8
Введите числа: 4.12 5 1.48 -6 0 7.3 5.12 0.005
Max=7.3

3)
begin
Writeln('Sum = ',Range(1,ReadInteger('n ='),2).Sum)
end.

Пример
n = 5
Sum = 9

0 0

4 года назад

Составить алгоритм числа А и В, число А увеличить на 1, число В умножить на 2, цикл 5 раз

Таня38

На паскале:
program zz;
var a,b,i,n: integer;
begin
n:=5;
write('A='); readln(A);
write('B='); readln(B);
for i:=1 to n do
begin
A:=A+1;
B:=B*2;
end;
writeln('A=', A);
writeln('B=', B);
end.

0 0

4 года назад

Передача файла размером 375 Кбайт через некоторое соединение заняла 24 секунды. Какова скорость передачи данных через это соедин

Евгений Коваленко

375 Кбайт = 375*1024 байт = 375*1024*8 бит

Скорость = 375*1024*8/24 = 128000 бит/сек

0 0

4 года назад

Помогииите! 1)Какого оператора цикла не существует в Паскале? a. if b. while c. for 2)Определите значение переменной «a» после в

Игорь20112010 [79]

1) a
2) 5
3) 0
4) and
5) c
6) по идее d но не уверен

0 0

4 года назад