Новые вопросы

Информатика Архивный вопрос

Напишите пожалуйсто программу .

Напишите пожалуйсто программу .<br>

Нет комментариев

Ответы

Гость

Var a = x-2;var b = x+2;var y = 0;
if (x<2) { y = 2*x / b;} else if (x>2) { y = 2*x / a;} else { y = a*b + a / (x+3);}
print ("Y=", y);

Нет комментариев

Похожие вопросы

Информатика

Как записать любой текст в файл с помощью консоли в Windows ??? Срочно нужно...

Ответить

Информатика

Помогите пожалуйста , срочно надо...

Ответить

Информатика

Нужно составить программу в paskal ABC:
Массив содержит n случайных двузначных чисел. Определить сколько в данном массиве четных чисел. Вывести все его элементы с нечетными номерами....

Ответить

Информатика

Паскаль. Найти все натуральные числа, не превосходящие заданного n и делящиеся на каждую из своих цифр.
Попробовал сам написать, но ошибся.

var n, i, p, t:integer;
Begin
write('Введите число n=');
readln(n);
for i:=1 to n do
begin
t:=i;
p:=t mod 10;
t:=t div 10;
if (p<>0)and(i mod p=0) then writ...

Ответить

Информатика

Слово нссрхплсгхса получено с помощью шифра виженера ключевое слово ваза. Восстановите исходное слово...

Ответить

Информатика

В чём преимущество исползовинии ярлыков?...

Ответить

Список предметов

Математика

Литература

Русский язык

Геометрия

Английский язык

Биология

Другие предметы

Обществознание

Окружающий мир

География

Українська мова

Українська література

Қазақ тiлi

Беларуская мова

Информатика

Экономика

Французский язык

Немецкий язык

Психология