annanudehead1426
?>

Запишите значение переменной y, полученное в результате работы следующей программы. текст программы на трёх языках программирования. var y, i: integer; begin y : = 0; for i : = 1 to 3 do y : = y + 4*i; writeln(y); end.

Информатика

Ответы

yusovd291
1) После первого выполнения цикла y = 0 + 4*1= 4;
2) После второго: y = 4 + 4*2 = 12;
3) После третьего: y = 12 + 4*3 = 24.
=> программа выведет "24".
ответ: 24.
zrv85
1.var a,b,c:integer;
d,x1,x2:real;
begin;
readln(a);
readln(b);
readln(c);
d:=sqr(b)-4*a*c;
if d<0 then
   writeln('Нет корней')
   else
    if d=0 then
     begin;
      x1:=-b/(2*a);
      writeln(x1);
     end
      else
       begin;
        x1:=(-b+sqrt(d))/(2*a);
        x2:=(-b-sqrt(d))/(2*a);
        writeln(x1);
        writeln(x2);
       end;
end.
2)var x1,y1,x2,y2:integer;
r1,r2,rr:real;
begin;
readln(x1);
readln(y1);
readln(x2);
readln(y2);
r1:=sqrt(sqr(x1)+sqr(y1));
r2:=sqrt(sqr(x2)+sqr(y2));
if r1>r2 then
 begin;
  rr:=r1-r2;
  write('Расстояние от точки А до начала координат больше, чем расстояние от точки В до начала координат на ',rr,' единиц');
 end
  else
   if r1<r2 then
    begin;
     rr:=r2-r1; 
    write('Расстояние от точки B до начала координат больше, чем расстояние от точки A до начала координат на ',rr,' единиц');
    end
     else
      write('Точки A и B равноудалены от начала координат');
end.
zdl2008
ЭВМ пятого поколения ставятся совершенно другие задачи, нежели при разработки всех прежних ЭВМ. Если перед разработчиками ЭВМ с I по IV поколений стояли такие задачи, как увеличение производительности в области числовых расчётов, достижение большой ёмкости памяти, то основной задачей разработчиков ЭВМ V поколения является создание искусственного интеллекта машины (возможность делать логические выводы из представленных фактов), развитие "интеллектуализации" компьютеров - устранения барьера между человеком и компьютером. Компьютер теперь используется и дома, это компьютерные игры, прослушивание высококачественной музыки, просмотр фильмов. Уже сейчас компьютеры воспринимать информацию с рукописного или печатного текста, с бланков, с человеческого голоса, узнавать пользователя по голосу, осуществлять перевод с одного языка на другой. Это позволяет общаться с компьютерами всем пользователям, даже тем, кто не имеет специальных знаний в этой области.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Запишите значение переменной y, полученное в результате работы следующей программы. текст программы на трёх языках программирования. var y, i: integer; begin y : = 0; for i : = 1 to 3 do y : = y + 4*i; writeln(y); end.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

reznikvi
horizma609
dianakryukova00
Чиркина999
Сергеевна-С.А.1549
anaissite6
Stasyadoma
Ни Дмитрий1095
Daniil1945
araqsyabadalyan1988
eidevyatkina
ktv665
Андрей-Викторовна1910
Reutskii-Kirilovskii1625
georgegradoff122