Смотри, x:=x+y Сам Y у нас тут не меняется, значит менялся только X. отсюда получаем 4=x+27 обычное уравнение. x=4-27=-23.
А т.к. Y не менялся, первоначальные значения равны:
x=-23, y=27
Var x,y:integer;beginread(x);if x<= 0 then y := 0; if x>0 then if x<=1 then y:=x; if x>1 then y:=x*x; write(y); end.
Ну во-первых программирование это создание каких-либо компьютерных программ, во-вторых программирование нужно, без них компьютер представляет между собой кусок металла.
Языки программирования<span> начали появляться в начале 1950 г использовались для преобразования простых арифметических выражений.</span>
вот, например, хотите вы создать презентацию, а откуда взялась это программа, ее написали программисты или хотите сыграть в игру, без программ, компьютер был бы ненужной вещью
1. Растровая графика
2. Прямоугольник
3. Пиксель
4.Цифровая камера.
5. Графика.
6. Ячейки
7.Видеокарта
// PascalABC.NET 3.1, сборка 1174 от 22.02.2016
begin
var a:=ArrRandom(ReadInteger('n='),1,50);
a.Println;
Writeln('Количество чисел 10 равно ',a.Where(x->x=10).Count)
end.
<u><em>Тестовое решение:</em></u>
n= 20
27 7 12 44 27 49 11 8 45 12 8 50 39 10 1 37 37 25 27 11
Количество чисел 10 равно 1