var
i, count: integer
i := 1;
count := 0;
repeat
String stroka;
readln(stroka);
if(length(stroka)<3)
count := count+1;
i:=i+1
Until(i=8);
Выводишь на экран
Цикл оформляй через for, я просто забыл синтаксис этого цикла.
На Гром-камне, служащем пьедесталом Медному всаднику, написано: "Petro Primo Catharina Secunda, MDCCLXXXII" (Петру Первому Екатерина Вторая, 1782).
Соответственно, ответ — секунда.
// Задание №1
var
a,s: integer;
begin
a:=300;
repeat
s:=s+a;
a:=a+2;
until a>400;
writeln('s = ', s)
end.
// Задание №2
var
a: integer;
begin
a:=100;
repeat
if a mod 8 = 0 then write(a:4);
a:=a+1;
until a>999;
end.
Первое число - это сумма цифр x , второе - меньшая цифра . x - положительное целое . судя по всему ,ответ x=68
+ ноутов: мобильность, возможность работы от аккумулятора.
- ноутов: быстрый нагрев всех компонентов, быстрый разряд аккумулятора, слабая вычислительная способность по сравнению с ПК
Не возможность работы с ресурсоемкими приложениями, т.к есть ограничение на озу (обычно ставят не более 2-4 гб и медленную).Слабый процессор, по сравнению с процессором пк.
+пк: высокая вычислительная способность, высокая скорость обработки данных, высокая надежность хранения данных. Способность долговременной работы без перегрева компонентов.
-пк: невозможность работы от аккумулятора, трудно перевозимый, громоздкий, шумный (если охлаждение по средствам кулеров).