using System;
namespace App {
class Program {
static void Main() {
Console.Write("V = ");
var V = double.Parse(Console.ReadLine());
Console.WriteLine("а = {0}", Math.Pow(V, 1 / 3.0));
Console.ReadKey();
}
}
}
Program t2; var a: integer; Begin write ('Введите колличество суток'); read (a);writeln ('Колличество часов ', a*24);writeln ('Колличество минут ',a*24*60);writeln ('Колличество секунд ',a*24*60*60); end.
Программа для резервного копирования данных на системный диск.
Var
s,i,k:integer;
m:array[1..20]of integer;
begin
write('Введите k: ');
readln(k);
writeln('Массив:');
for i:=1 to 20 do
begin
m[i]:=random(20);
write(m[i],' ');
if m[i] mod k=0 then s:=s+m[i];
end;
writeln;
writeln('Ответ: ',s);
<span>end.</span>
