Регистрация
али421
01.05.2020 09:16
Информатика
Есть ответ 👍

Вывести на экран первые n чисел последовательности: 8, 14, 20, 26, найти а1+а3+а5+а7+а9, где ai - это i-ое число последовательности чисел. написать ко второму программу на паскале с использованием while/repeat/for.

289
483
Посмотреть ответы 2

Ответы на вопрос:

Sasha13353747
Sasha13353747
4,4(71 оценок)
Program p1; var i,n,s: integer; begin s: =8; write('введите n: '); readln(n); for i: =2 to n do begin write(s,' '); s: =s+6; end; writeln(s,' '); end.
KiskaSofia
KiskaSofia
4,5(15 оценок)

program raf105;

var i,b,min: integer;

a: array[1..10] of integer;

begin

writeln('вводите 10 чисел по очереди');

for i: =1 to 10 do

begin

  readln(a[i]);

  if (i=1) or (a[i]

    then min: = a[i];

end;

a[8]: = min;

writeln('вывод: ');

for i: =1 to 10 do

  writeln('[',i,'] ',a[i]);

end.

язык программирования pascalabc

Популярно: Информатика