Предмет: Информатика, автор: merkov

Помогите по информатики.Я не могу понять как это делать(

Приложения:

Ответы

Автор ответа: Lera73

Блин, странно как-то. В блок-схеме написано 10, а в задании -10. Если 10, то вот вроде правильно:

Program Z_1;

var y,x:real;

Begin

Writeln('Введите значение x');

Read(x);

If x<=10 then

y:=x*x

Else

y:=20-x;

Writeln('Значение y:');

Write(y);

End.

Предыдущий вопрос

Следующий вопрос

Интересные вопросы

Предмет: Алгебра, автор: Alletikin

Решите системы неравенств:

7 лет назад

Предмет: Алгебра, автор: brain212

а) При каких значениях Х имеет смысл выражения
$\sqrt{ - x}$
?

7 лет назад

Предмет: Алгебра, автор: likkkaa06

приведите дроби к общему знаменателю и вычти помогите пожалуйста

7 лет назад

Предмет: Математика, автор: olesya124

1.Потолок и стены комнаты длиной 5,5 м, шириной 3 м и высотой 2,7 м обиты вагонкой. Сколько литров лака потребуется для покрытия вагонки, если на 1 кв.м требуется 0,2 л лака, а суммарная площадь окон и двери составляет 6 кв.м? 2.Подарочная коробка, имеющая форму прямоугольного параллелепипеда с измерениями 2 дм, 1,5 дм и 1,3 дм, со всех сторон отделана замшей. Определите, сколько для этого потребовалось замши, если на швы и подгибы ушло в общей сложности 2 кв.дм.

10 лет назад

Предмет: Математика, автор: Риткаа

Представьте в виде многочлена выражение: (a+b)(a-b+1)-(a-b)(a+b-1)

10 лет назад