Я думаю что так: 144.69.20.35.1.2
Program Prog;
Uses crt;
var a: array [1..100] of real;
i, N: integer;
begin
clrscr;
Write('N = ');
readln(n);
for i:=1 to n do
begin
write('a[',i,'] = ');
readln(a[i]);
end;
writeln;
writeln('Положительные числа: ');
for i:=1 to n do
if (a[i]>0) then
writeln('a[',i,'] = ', a[i]);
end.
Если просто, то нарисуй человечка, который говорит и моргает глазами.
Если нужно на любую тему, нарисуй Билла Шифра (на фото), как будто он двигает зрачком в глазу.
;-; БИЛЛА ШИФРА РИСОВАЛА САМА! ПРОВЕРЬТЕ ;-;
В первом мы повторяем количество раз от 6 до 12 ,то есть 10+10+10+10+10+10 ,ответ будет 60
а во втором мы ищем нужное нам значения начиная с 1 , в условии написано ,если Dat(k)<25 то мы присваем m этот Dat, то есть ответ 20
<h2>Программа не будет работать без <u>ключевого слова алг</u> и <u>ключевого слова кон</u></h2>