20 пунктов даю ,очень прошу помогите !! Написать программу по информатике на языке Paskal ,линейная программа с комбинированными условиями :итак ,написать
5-9 класс
|
программу для вычисления выражения y=a/b-c,это дробью ,y=a дробь b-c,где a,b,c,-действительные числа ,при b=c решений нет .
var
a, b, c, y : Real; // Действительные числа , y = a/(b-c)
begin
write('Введите A = ');
readln(a);
write('Введите B = ');
readln(b);
write('Введите C = ');
readln(c);
if b = c then
writeln('Решений уравнения нет!')
else
begin
y := a/(b-c);
writeln('y = ', y);
end;
end.
Задачу немного понятнее можно? Напишу!
не знаю как еще сказать ,повторила задание в точности как учитель сказал ,это все
Другие вопросы из категории
Читайте также
СРОЧНО нужно...помогите где можно скачать без регистрации и СМС......
1. Дано 2 числа найти модуль разности этих чисел увеличенный в 5 раз.
2. Дано 4 значное число поменять местами 1 и 2 цифру местами
3. Дан диаметр круга найти его площадь (формула S=п*R).
Я примерно знаю как писать но всеровно нуждаюсь в помощи
Мои мысли:
program z1;
uses crt;
var ... : integer;
begin
дальше всё в тумане
буду рад за решённые 1 или 2 задачи
Составьте программу, которая формирует массив из 40 случайных целых чисел от 0 до 20 и вычисляет:
1). сумму чисел, не превышающих 10;
2). сумму чисел,кратных 3. Помогите пожалуйста,написать эту программу на PaskalABC.