Прошу если нетрудно решите
5-9 класс
|
program chik;
var x,y:real;
begin
readln(x);
if(x<>23)then begin
y:=(5*x-2*x*x)/(x-23);
writeln(y);
end;
end.
2)
program chik2;
var a,b:real;
begin
readln(a,b);
if(a<b)then writeln(a);
if(a>b)then writeln(b);
end.
3)
program chik3;
var n,p,a,b:integer;
begin
readln(n);
a:=n div 100;
b:=n mod 10;
p:=a*b;
writeln(p);
end.
4)
program chik4;
var x,y:real;
begin
readln(x,y);
if(x>0)and(y<0)then writeln('yes')else writeln('no');
end.
5)
program chik5;
var x,y:real;
begin
readln(x);
if(x<5)then y:=5*x;
if(x>5)then y:=1/(x-5);
if(x<>5)then writeln(y);
end.
надеюсь это на 5!!
Другие вопросы из категории
-среди нас не более одного лжеца
-среди нас не более двух лжецов
-среди нас не более трех лжецов
-среди нас не более четырех лжецов.
Я думаю, два лжеца - первый и второй. А вдруг не правильно?
способны донести сигнал на несколько километров. 4) самое современное средство получения информации. 5) Часть схемы , передающей информацию.
Читайте также
программу,определяющую большее из двух чисел. Проверить работу программы для всевозможных комбинаций
если сможете решите весь кроссворд:)
перепробовать комбинации всех забытых цифр , чтобы в результате дозвониться до приятеля?
3,29 Гб ёмкость 3,74 Гб, Ответ должен быть 6. Если можно решите задачу подробнее
его. запишите порядок команд в программе преобразования числа 12 в число 122,содержащей не более одной,то запишите любую из них. Ребят прошу объяснить и решить,очень надо,СРОЧНО!ПОМОГИТЕ ПОЖАЛУЙСТА!ОЧЕНЬ ОЧЕНЬ НАДООО!ПЛИИИЗ