6542+4321=13063+5563=20646+7543=30411
Вот все задания сделанные на паскале
var A:array[1..10] of integer;
i:integer;
s: integer;
begin
writeln('Массив А:');
s:=0;
for i:=1 to 10 do
begin
write('Введите ',i,'-e число ');
readln(A[i]);
if A[i] <> 0 then s:=s+1;
end;
write('Строка чисел: ');
for i:=1 to 10 do
begin
write(a[i],' ');
end;
writeln();
writeln('Сумма элементов, не равных нулю = ',s);
end.
По условию:
a=5, b=20, c=-7, d=25
Находим значение переменной r:
r = a + (4 * b * c ) * d = 5 + (4* 20 * -7) * 25 = -13995
Находим значение переменной a:
a = a + 4 = 5 + 4 = 9
Находим значение переменной d:
d = a * 7 = 9 * 7 = 63
program r_a_d;
var
a, b, c : integer;
r, d : real;
begin
a:=5;
b:=20;
c:=-7;
d:=25;
r := a + (4 * b * c ) * d;
a := a+4;
d := a*7;
writeln('r=', r:10:4, ', a=', a, ', d=', d:10:4);
end.
C самого детства-я считал, что в вычислительных машинах таилось нечто особенное, непонятное многим людям. В возрасте 6 лет я точно определился-компьютеры-моя любовь. Достаточно много времени прошло с того момента, и я уже во многом разбираюсь, но до сих пор точно не определился, на какую специализацию пойти в будущем, ведь их так много! Информационная безопастность, прикладная информатика, программирование автоматизированных систем, web программирование, специалицазии на определенных языках программирования...-у меня разбегались глаза. Впрочем я и сегодня, занимаясь письмом этого сочинения до сих пор думаю о своем "Великом выборе".
Однако одно я могу заявить точно, с настоящей гордостью-"Я люблю компьютеры и хочу связать с ними свою жизнь!"