сервис вопросов и ответовНаписать программу для Паскаля.
5-9 класс|
|
3 сопротивления R1,R2,R3 соединены параллельно.Найти общее сопротивление соденинения.
Написать(наподобие Program *что-то* и дальше var...и т.д)
Gumsclad
11 марта 2015 г., 18:39:49 (9 лет назад)
Jilly1985
11 марта 2015 г., 20:23:19 (9 лет назад)
program resistance;
var r1, r2, r3: real;
begin
readln(r1, r2, r3);
r1 := 1/r1 + 1/r2 + 1/r3;
r1 := 1/r1;
writeln(r1)
end.
Скалько
11 марта 2015 г., 22:48:44 (9 лет назад)
ФВС, с удивлением обнаружила, что много где написана формула r1 = (r1 r2 r3)/(r1+r2+r3). Странно, откуда это берётся? Ведь должно быть (r1 r2 r3)/(r1r2+r1r3+r2r3)
Неужели столько людей считают, что 1/a+1/b+1/c=(a+b+c)/(abc)?
Ответить
Другие вопросы из категории
В коробке 16 разноцветных карандашей. Какое
количество информации содержит сообщение, что из коробки достали синий
карандаш?
Читайте также
Помогите написать программу для Паскаля.
1. Написать программу нахождения произведения n чисел.
1)найти сумму первых k последовательных нечетных чисел. написать программу в паскале. 2)вывести на экран натуральные нечетные числа от 5 до 55.тоже
паскаль 3)найти произведение последовательных натуральных чисел от n до m. написать программу паскаль. 4)найти сумму последовательных натуральных чисел от 10 до 15.тоже паскаль
составить на Паскале: 1) программу для вычисления суммы ряда S=1+ 1/2+1/3+1/4+..+1/N. Число N вводится с клавиатуры. 2) одноклеточная
амеба каждые 3 часа делиться на 2 клетки. Определить, сколько амеб будет через 3,6,9,12 и 24 часа.
3) дано натуральное числоо N и действительное число Х. Вычислить сумму ряда sin(x)+sin(2x)+sin(3x)+...+sin(Nx).
4) написать программу для вычисления n-ой степени числа А.
помогите, пожалуйста)
Написать программу для определения максимального числа из данных пяти чисел.
Пользователь вводит пять чисел. Программа выводит ответ: "Максимальное число ... ".
Написать программу в "КуМиРе"
Помогите , пожалуйста . Нужно написать программу для Паскаль.
Ввести пять чисел и найти наибольшее из них.
Я тут написал кое-что ,но не знаю правильно ли :(
HELP ME.
program ru;
var a,b,c,d,e,max:integer;
begin
writln('Введите пять целых чисел');
if a>b then
begin
max:=a;
end
else begin
max:=b;
end;
if max>c then
begin
max:=max;
else begin
max:=c;
end;
if d>e then begin
max:=d;
end
else begin
max:=e;
end.
Вы находитесь на странице вопроса "Написать программу для Паскаля.", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.