Вэвм вводятся результаты соревнований по прыжкам в высоту. число участников произвольно. напечатать сообщение о победителе. (оператор цикла for, paskal)
writeln('введите результаты ',n,' участников по очереди');
for i: =1 to n do
begin
write(i,'. ');
readln(a);
if a > max
then begin
max: = a;
maxn: = i;
end;
end;
writeln('победил участник №',maxn,' с результатом ',max);
end.
pascalabc 3.4.2
Svetlana1335
15.03.2021
#include< cmath> #include< iostream> using namespace std; int main() { int n; double p = 1; cout < < "n = ", cin > > n; for(int a = 1; a< =n; a++) p=p*a; p = (n> 0? pow(p,(double)1/n): 0); cout < < "p = "< < p< < "\n"; system("pause"); return 0; }
Nikolai_oksana
15.03.2021
Если имеется в виду microsoft word, то: 1) колонтитулы можно вставить в документ в любом режиме, допускающим редактирование текста; при этом word сменит вид отображения документа на "колонтитулы", сходный с редимом разметки страниц. утверждение неверно.2) масштаб по ширине страницы может меняться; в том числе выбираться таким, чтобы отобразить на экране строку документа полностью. утверждение неверно.3) режим структуры можно установить тогда, когда пользователь сочтет нужным, но целесообразно это делать при форматировании документов, в том числе, их заголовков. утверждение неверно, поскольку категорично, а не рекомендательно.4) номера страниц документа видны только в режимах разметки и чтения документа. утверждение неверно.получается, что все утверждения неверны в той, или иной степени.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Вэвм вводятся результаты соревнований по прыжкам в высоту. число участников произвольно. напечатать сообщение о победителе. (оператор цикла for, paskal)
program raf105;
var
i,n,maxn: integer;
a,max: real;
begin
max: = -10000;
n: = random(3,10);
writeln('введите результаты ',n,' участников по очереди');
for i: =1 to n do
begin
write(i,'. ');
readln(a);
if a > max
then begin
max: = a;
maxn: = i;
end;
end;
writeln('победил участник №',maxn,' с результатом ',max);
end.
pascalabc 3.4.2