<span>If (a>=10) and (a<=99)
then begin
writeln (a,'-двузначное число');
writeln ('его квадрат=', sqr(a));
end
else (a,' не является двузначным числом');</span>
Если нужен алгоритм для системы "Кумир", то вот он:
использовать Чертежник
алг
нач
цел n,i,x,y
поднять перо
сместиться в точку (-2,-2)
нц для n от 0 до 3
нц для i от 1 до 4
выбор
при i=1: x:=0; y:=2
при i=2: x:=2; y:=0
при i=3: x:=0; y:=-2
при i=4: x:=-2; y:=0
все
опустить перо
сместиться на вектор (x,y)
поднять перо
сместиться на вектор (x*n,y*n)
опустить перо
сместиться на вектор (x,y)
кц
поднять перо
сместиться на вектор (-1,-1)
кц
кон
Информация (от <u />лат. informatio — «разъяснение, изложение, осведомлённость») — сведения о чём-либо, независимо от формы их представления.
Информатика (от <u />информация и <u />автоматика) — <u />наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации, обеспечивающих возможность её использования для принятия решений.
Компьютер (англ. computer, МФА: — «вычислитель») — устройство или система, способное выполнять заданную, чётко определённую последовательность операций.
Текстовый редактор — самостоятельная <u />компьютерная программа или компонент программного комплекса (например, <u />редактор исходного код<u />а интергрированной среды разработки или окно ввода в браузере), предназначенная для создания и изменения <u />текстовых данных вообще и <u />текстовых файлов в частности.
Графический редактор<span> — <u />программа</span><span> (или пакет программ), позволяющая создавать и редактировать двумерные изображения с помощью <u />компьютера.</span>
var s,summ:integer;
begin
writeln("До какого числа считать");
readln(s);
for i:=1 to s do
if i mod 5=0 then
summ:=summ+i;
writeln(summ);
end.