Я не знаю какой вы класс, но самое простое с моей точки зрения решить с помощью Х.
1) 5*20=100(симв) набрала Катя ранее
Пусть через Х мин. у них будет одинаковое количество символов набрано.
Значит, у Кати будет 20*Х+100, а у Маши 40*Х
20х+100=40х
20х=100
х=5(мин)
<span>Через 5 мин девочки введут одинаковое количество символов.
</span>
===== PascalABС.NЕТ =====
begin
ReadArrInteger('Вводите:', ReadInteger('n ='))
end.
Нельзя:
Есть, пить напитки.
Заходить с грязными руками.
Выключать компьютер часто.
Дергать за провода.
Шуметь и бегать по классу
находится в кабинете на перемене.
Запускать посторонние программы
Удалять, перемещать или переименовывать программы , папки, файлы.
Var B: array [1..12] of integer; i, s, s_min: integer;
begin
writeln;
randomize;
s := 0;
s_min := 0;
for i := 1 to 12 do
B[i] := random(65) - 5;
for i := 1 to 12 do
begin
write(B[i], ' ');
s := s + B[i];
if B[i] < 7
then
s_min := s_min + 1;
end;
writeln();
writeln('Sum: ', s, ', amount of elemnts which lower than 7: ', s_min);
<span>end.</span>
Ответ:
Float a, skv, skb v;
Edit1.Text := StrtoInt(a) ;
skv := a * a;
skb := a * a *6;
v := a * a * a;
Label1.Caption := Площадь квадрата = InttoStr(skv) ;
Label2.Caption := Площадь Куба = InttoStr(skb) ;
Label2.Caption := Объём куба = InttoStr(v) ;
Объяснение: