Var
A :array[2..20] of integer;
i : integer;
begin
for i:=1 to 22 do
for i:=1 to 22 do
begin
A[i]:=A[A+2];
Writeln(a[i]:4);
end;
end.
const n=5;
var a: array [1..n] of real;
i: integer;
begin
for i:=1 to n do begin readln(a[i]);
if i mod 2=1 then a[i]:=sqr(i);
writeln(i,' элемент массива равен : ',a[i]);
end;
end.
PascalABC:
program ocenka; //название программы
var a:integer; //целочисленная переменная оценки
begin
writeln(a); //ввод (с клавиатуры) значения оценки
if (a=2) then writeln('Плохо') else writeln('Хорошо'); //условие (если а=2 -
// ругаем, иначе - хвалим)
end.
портативный пк, в корпусе которого объединены типичные компоненты ПК, включая дисплей , клавиатуру устройство указания (обычно сенсорная панель, или тачпад), а также батарею.
- Создаешь блокнот
- Вставляешь такие символы (ну ты поймёшь)
<head>
<title> Заголовок </title>
</head>
<body>
Текст
</body>
</html>
3.В блокноте наверху будет написано "файл" и нажимаешь на него
4.Там будет "Сохранить как"
5.И внизу строчку будет написано блокнот (или как там его назвал), и ты в этой строчке, в конце пишешь .html
6.Открываешь и всё)
Скриншот