Ответы
Ответ дал:
0
1)
Program DZ1;
begin
write ('20 20 20 20 20 20 20 20 20 20');
end.
2)
Program DZ2;
var i,n,x:longint;
begin
read (x,n);
for i:=1 to n do
write (x,' ');
end.
3)
Program DZ3;
var i:longint;
begin
writeln ('1 фунт = 453 г');
for i:=2 to 10 do
if i<5 then writeln (i,' фунта = ',453*i,' г')
else writeln (i, фунтов = ',453*i,' г');
end.
Program DZ1;
begin
write ('20 20 20 20 20 20 20 20 20 20');
end.
2)
Program DZ2;
var i,n,x:longint;
begin
read (x,n);
for i:=1 to n do
write (x,' ');
end.
3)
Program DZ3;
var i:longint;
begin
writeln ('1 фунт = 453 г');
for i:=2 to 10 do
if i<5 then writeln (i,' фунта = ',453*i,' г')
else writeln (i, фунтов = ',453*i,' г');
end.
Вас заинтересует
1 год назад
1 год назад
5 лет назад
5 лет назад
8 лет назад
8 лет назад
8 лет назад
8 лет назад