Решите СРОЧНО в pascal ABC это восьмой класс, даю 30БАЛЛОВ. Created by Artem774. informatika-ru

Решите СРОЧНО в pascal ABC это восьмой класс, даю 30БАЛЛОВ...

December 2021 1 3 Report

Решите СРОЧНО в pascal ABC это восьмой класс, даю 30БАЛЛОВ

Answers & Comments

Студэнt //PascalABC
{1} //факториал
var prod, n: integer;
begin
prod:=1;
readln (n);
for var i:=1 to n do prod:=prod*i;
write (prod)
end.

{2}
var n, min, i: integer;
begin
readln (min);
for i:=1 to 9 do
begin
readln (n);
if n<min then min:=n;
end;
write (min);
end.

{3}
var sum, count, a: integer;
begin
sum:=0; count:=0; a:=0;
repeat
readln (a);
inc (count);
inc (sum, a);
until a=0;
write (sum/(count-1))
end.

{4}
uses Crt;
var x, y: integer;
begin
repeat
gotoXY(1, 1);
clearline;
write ('x ='); readln (x);
clearline;
write ('y ='); readln (y);
gotoXY (x, y); write ('#');
until (x=0) and (y=0);
end.

Студэнt Вместо clearline вставь:

Artem774 что?

Студэнt write (' '); gotoXY(1, whereY);

Студэнt *write ('{много пробелов}');

Artem774 в одном месте решётка появляется

Artem774 всегда

Artem774 и пробел на x появляется

Artem774 а нет всё норм

Artem774 равда через раз работает

Artem774 ну все спасибо

Answers & Comments

pomogite reshit zadachu po geometriinuzhno dokazat ispolzovat podobie treugol

srochno ochen za 10 minut pozhalujsta otdayu vse bally himiya 8 nizhe ocenki zadanie

tour to Marcel next week. Task 4. Rewrite the following statements in reported ...

string6 dan simvol c izobrazhayushij cifru ili bukvu latinskuyu ili rus skuyu e

100 ballov pozh otvette srochno pyat predlozhenij pro babushku lyubye v past perfect

proverochnaya rabota po teme nervnaya sistema cheloveka zadanie 1 napishi okoncha

htmlgt primechanie cvet fona f5fffa zagolovok oformlen te

s kakimi iz perechislennyh veshestv mozhet reagirovat aoksid magniya bgidroksid

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

Helpful Links

Helpful Social