Помогите решить задачи, 8 класс(Pascal ABC)Задача №3. Дан диаметр окружности d. Найти ее длину L = 3.14*d. Задача №4. Дана длина ребра куба a. Найти объем куба V = a 3 и площадь его поверхности S = 6a 2 . Задача №5. Дано рассто...
Помогите решить задачи, 8 класс(Pascal ABC)
Задача №3. Дан диаметр окружности d. Найти ее длину L = 3.14*d.
Задача №4. Дана длина ребра куба a. Найти объем куба V = a 3 и площадь его поверхности S = 6a 2 . Задача
№5. Дано расстояние в сантиметрах. Найти число полных метров и километров данного расстояния
Гость
Ответ(ы) на вопрос:
Гость//Pascal ABC.NET v3.1 сборка 1172
//3
Var
d:real;
begin
readln(d);
writeln(3.14*d);
end.
//4
Var
a:real;
begin
readln(a);
writeln('V=',a*a*a);
writeln('S=',6*sqr(a));
end.
//5
Var
a:real;
begin
readln(a);
writeln(a/100,' м');
writeln(a/100000,' км');
end.
Не нашли ответ?
Похожие вопросы