На языке Pascal составьте программу вывода на экран номера этажа и номеров кварт...

July 2022 1 6 Report

На языке Pascal составьте программу вывода на экран номера этажа и номеров квартир, находящихся на данном этаже, для девятиэтажного дома, на каждом этаже которого находится по 5 квартир

Answers & Comments

ITnoob Это программа для ALGO:
program Etag;
var K: array[1..5] of integer;
et, f: integer;
begin
write ('Ваш этаж - ');
readln (et);
K[1] := 1+5*(et-1);
K[2] := 2+5*(et-1);
K[3] := 3+5*(et-1);
K[4] := 4+5*(et-1);
K[5] := 5+5*(et-1);
writeln ('Квартиры:');
for f := 1 to 5 do writeln (K[f]);
end.

1 votes Thanks 0

Answers & Comments

na yazyke pascal sostavte programmu vyvoda na ekran nomera etazha i nomerov kvart4622ce142ebe3eb4a95fe0fface40421 37343

pomogite sdelat informatiku45f83bd7f24b42737c45391637c25570 4956

pomogite reshit informatiku napishite programmu v srede pascal abc vychisleniya sr1326f792d13ac7e958070d85444afd11 47465

pomogite reshit informatiku napishite programmu v srede pascal abc vychisleniya sr

рекомендуемые вопросы

Helpful Links

Helpful Social