Выбери правильное значение количества исполнений цикла.
Дан цикл:
for i:=1 to 7 do writeln(‘Привет мир!’);

Сколько раз будет выведено сообщение?
- 6
- 5
- 7
- 8

program nm12;

var a, d : integer;

begin

    writeln (' vvedite diametr kruga i storony kvadrata ');

    readln (d);

    readln (a);

    if d< =a then writeln (' krug pomestits9 v kvadrate ')

              else writeln (' krug ne pomestits9 v kvadrate ');

    readln;

end.

1 simvol zanimaet 1 bait(tak kak imeem tekst);

tekst shpargalki sostavliaet 50*50=2500 simvolov-2500 bait.

da + eshe 0,3*2500=750.

vsego 2500+750=3250 bait.

компьютер телфон и иже с ними

var

x: real;

begin

readln(x);

writeln(round(x));

end.