Регистрация
adelina2001levchuk
16.07.2020 16:01
Информатика
Есть ответ 👍

Напишите программу на языке паскаль , которая будет делииь пирог на равные части по весу. ( масса пирога/кол во учеников ) Если кол во учеников = 0 , то должно выйти сообщение " 0 учеников в классе не может быть "

209
491
Посмотреть ответы 1

Ответы на вопрос:

рашад10
рашад10
4,6(38 оценок)

Відповідь:

Пояснення:program z2;

uses crt;

var a:array[1..25] of byte; {- описание массива}

i,j:byte;

begin

clrscr;

for i:=1 to 5 do begin {- цикл, отвечающий за присваемую цифру}

for j:=5*i-4 to 5*i do begin {- цикл, отвечащий за индекс элемента массива}

a[j]:=i;

write(a[j]);

end;

writeln;

end;

readkey

end.

Популярно: Информатика