Записать в turbo pascalе начав тренировки, лыжник в первый день пробежал 10км. каждый следующий день он увеличивал пробег на 10% от пробега предыдущего определить: а) в какой день он пробежит больше 20км б) в какой день суммарный пробег за все дни превысит 100км

program ncdkj;

uses crt;

var a,b,p,d,sd: integer;

begin

clrscr;

a: =10;

b: =10;

d: =1;

sd: =1;

p: =10*0,1;

repeat 

a: =a+p;

d: =d+1;

until a> 20;

repeat 

b: =b+p;

sd: =sd+1;

s: =s+b;

until s> 100;

case sd mod 7 of

0: writeln('сумма 100 км в 7');

1: writeln('сумма 100 км в 1');

2: writeln('сумма 100 км в 2'); и так до шести

case d mod 7 of

0: writeln('20 км в 7');

1: writeln('20 км в 1');

2: writeln('20 км в 2'); и так до шести

readln;

end.

надеюсь второе   правильно понял, вроде должно работать

 

Type   mas = array [1..10] of integer; var     x: mas;   min, max: integer;     i: integer; begin     for i : = 1 to 10 do     readln (x[i]);   min : = x[1];   max : = x[1];   for i : = 2 to 10 do begin       if x[i] < min then         min : = x[i];     if x[i] > max then       max : =x[i]   end;   writeln (max * min); end.

Презентация (общественное представление)  — общественное представление чего-либо нового, недавно появившегося, созданного.презентация (способ представления информации)  — информационный или рекламный инструмент, позволяющий сообщить нужную информацию об объекте презентации в удобной для получателя форме.мультимедийная презентация  — набор слайдов и спецэффектов (слайд-шоу), текстовое содержимое презентации, заметки докладчика, а также раздаточный материал для аудитории, хранящиеся в одном файле.презентация для лифта  (. elevator pitch или elevator speech)  — короткий рассказ о концепции продукта, проекта или сервиса.презентация антигена  — один из ключевых процессов, в ходе которого компоненты системы врождённого иммунитета, такие как макрофаги и дендритные клетки, стимулируют иммунный ответ системы приобретённого иммунитета путём представления (презентации) захваченного ими антигена т-лимфоцитам.предъявление, представление ко взысканию.