В результате выполнения фрагмента программы: var

s: integer;

c: array [1..3] of integer;

const a: array [1..3] of integer=(1, 2, 0);

const b: array[1..3] of integer=(1, 2, 0);

begin

s:=1;

for i:=1 to 3 do

begin

c[i]:= a[i] + b[i];

s:= s * c[i];

end;

будет вычислено значение s, равное
с решением

ввод/вывод означает взаимодействие между обрабочиком информации (например, компьютер) и внешним миром, который может представлять как человек, так и любая другая система обработки информации. ввод — сигнал или данные, полученные системой, а вывод — сигнал или данные, посланные ею (или из нее).

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

 

    устройства для взаимодействия между компьютерами, как модемы и сетевые карты , обычно служат устройствами ввода и вывода одновременно.

var alpha: real;

begin

  read(alpha);

  if alpha > 90 then write("tupougolnyj");

  if alpha = 90 then write("prjamougolnyj");

  if alpha < 90 then write("ostrougolnyj");

end.

program divisors;

var

n,i: integer;

begin

readln(n);

for i: =n downto 1 do if n mod i = 0 then write(i,' ');

end.

зеркало

коромысло

дупло

дуло

крыло