1.
program simple;
var a,b:integer;
begin
writeln('daite a, b); readln(a,b);
writeln('x = ', b/a); readln;
end;
2.
program day;
var h,hours,minutes:longint;
begin
writeln('daite secundi'); readln(h);
hour:= h div 3600; minutes:=h mod 36000;
if (minutes > 60) or (minutes=60) then
begin
hour:=hour+1;
minutes:=minutes-60;
end;
writeln('It is 'hours' hours 'minutes' minutes');
readln;
end;
3.
program summaChisla;
var s:string; i,sum: longint; c,cod:integer;
begin
writeln('daite nomer); readln(s);
for i:=1 to length(s) do
begin
val(s[i],c,cod); sum:=sum+c;
end;
writeln('summa :',sum); readln;
end;
Поделитесь своими знаниями, ответьте на вопрос:
1. форматирование абзацев и страниц 1. в текстовом процессоре создайте новый документ. 2. наберите черновик документа (times new roman, 14 пунктов, выравнивание по левому краю) со следующим текстом: текст для ввода номер абзаца принтер для вывода документа на бумагу к компьютеру подключается печатающее устройство — принтер. существуют различные типы принтеров. матричный принтер печатает с металлических иголок, которые прижимают к бумаге красящую ленту. струйный принтер наносит буквы на бумагу, распыляя над ней капли жидких чернил. с его не только черно-белые, но и цветные изображения. в лазерном принтере для печати символов используется лазерный луч. это позволяет получать типографское качество печати. 1 2 3 4 5 3. выполните форматирование в соответствии со следующими требованиями: номер абзаца свойства абзаца форматирование символов выравнивание междустрочный интервал шрифт размер начертание 1 по центру одинарный arial 14 полужирный 2 по левому краю 1, 5 строки times new roman 12 полужирный 3 по правому краю двойной times new roman 12 курсив 4 по ширине 1, 5 строки times new roman 12 подчеркнутый 5 по центру одинарный times new roman 12 полужирный, курсив 4. выполните форматирование страницы следующим образом: установите размер всех полей 1, 5 см, ориентация страницы – альбомная, размер бумаги – а5. 5. в нижнем левом углу установите номера страниц, в верхнем колонтитуле укажите дату создания документа. 6. сохраните файл в личной папке под именем принтеры и закройте его