<h3>PascalABC.NET 3.4.2, сборка 1857 от 05.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var a:=ReadReal('a=');
var n:=ReadInteger('n=');
var s:=1/a; // для n=1
if n<=1 then s+=1
else
begin
a*=a; // a^2
var z:=a;
for var i:=2 to n do
begin
s+=1/z;
z*=a
end
end;
Println(s)
end.
<h2>a= 3.73</h2><h2>n= 5</h2><h2>0.34553638581855</h2>
Как то так:
а) 1,2,2,1,1 (пояснение: (3-1)*3*3-1-1=16)
б) 2,2,2,1,1 ( пояснение: 1*3*3*3-1-1=25)
Program one;
var n, k, y: integer;
begin writeln('Введите число школьников: '); read(n); writeln('Введите число яблок: '); read(k); y := k div n; writeln('Каждому школьнику достанется по ', y, ' яблок');end.
Ответ:
1) 1 этап идея для скрипта, 2 этап сценарий, 3 этап рисование 2) не могу точно сказать мне нужна фотография этой блок-схемы 3) скрипт заставляет обьект танцевать с помощью изменения костюма
Объяснение:
надеюсь помог, наслаждайся :)
Хмм...
Массив определяется (объявляется) двумя переменными(допустим a и b), где a - название массива, b - число столбцов. Имеет вид a[b] - это одномерный массив. Есть двумерные массивы a[b,c] - с - число строк. Они могут быть и трехмерные и n-мерные, но реже.
Массив это грубо говоря таблица состоящая из С строк и b столбцов и называющаяся A. Отсчет обычно идет с нулевого элемента, т.е. самый первый элемент массива будет a[0;0].
Всё о массивах написать трудно, т.к. много и не понятно, что вообще Вам нужно.