Ответ: 1,3
с1 получает целое число от деления.
с2 получает остаток от деления.
Потом просто выводятся через пробел.
1 - 1)
2 - 4)
3 - Нужно чтобы число было в цикле от большего к меньшему. Так что подходит 1) и 4).
Var
x,s:real;
n,i:integer;
begin
write('Введите n и x: ');
readln(n,x);
for i:=1 to n do s:=s+cos(power(x,i));
writeln('y=',s)
<span>end.</span>
А)Мои документы
Б)Сетевое окружение
Простите если не правильно,но других вариантов я не знаю!
1)
var max, min, i, n : integer;
a : array [1..255] of integer;
BEGIN
// ввод массива
read(n);
for i := 1 to n do
read(a[i]);
// то, что в блок-схеме
max := a[1]; min := a[1];
for i := 2 to n do begin
if a[i] < min then
min := a[i]
else if a[i] > max then
max := a[i];
end;
write(min, ' ', max);
END.
2) Если k - это любое число >= 1, то значения элементов массива сдвинутся на 1 влево. К примеру, если k = 1, то a[1] = 12, a[2] = 5, a[3] = 8 и так далее