Предмет: Информатика,
автор: Аноним
Паскаль (Pascal ABC) Задача.Массивы. Даны три целых числа: N (> 2), A и B. Сформировать целочисленный массив размера N, каждый элемент которого рассчитывается по формуле: (А+В)*I, где I – индекс элемента массива. Вывести полученный массив на экран, расположив каждый элемент в отдельной строке
Ответы
Автор ответа:
0
var
ar:array of integer;
n,i,a,b:integer;
begin
readln(n,a,b);
setlength(ar,n);
for i:=1 to n-1 do begin
ar[i]:=(a+b)*i;
writeln(ar[i]);
end;
end.
ar:array of integer;
n,i,a,b:integer;
begin
readln(n,a,b);
setlength(ar,n);
for i:=1 to n-1 do begin
ar[i]:=(a+b)*i;
writeln(ar[i]);
end;
end.
Интересные вопросы
Предмет: Русский язык,
автор: Vika17112003
Предмет: Английский язык,
автор: garifullinkari1
Предмет: Русский язык,
автор: guineas121p16as9
Предмет: Русский язык,
автор: Аноним
Предмет: Математика,
автор: didina59