ответ:
. в нужно вывести все составные числа из промежутка [2; n]. код программы:
program lab3;
var i,n,j,s,l: integer;
m: real;
begin
readln (n);
for i: =2 to n do
begin
s: =trunc (sqrt (i));
for l: =2 to s do
begin
m: = i mod l;
if m=0 then
write (' ',i);
end;
end;
end.
но проблема - как только s становится больше 2, составные числа начинают несколько раз повторятся, т.к., например 12 делится и на 2 и на 3. вопрос: как мне сделать выход из цикла после первого успешного деления?
var
i, n, j, s, l: integer;
m: real;
begin
readln(n);
for i : = 2 to n do
begin
s : = trunc(sqrt(i));
for l : = 2 to s do
begin
m : = i mod l;
if m = 0 then
begin
write(' ', i);
break;
1.выбирайте правильную позу.
соблюдайте расстояние от глаз до монитора – 55-60 см (расстояние вытянутой руки).
выбирайте для работы за компьютером удобное кресло.
высота сиденья кресла (стула) должна быть такой, чтобы руки, положенные на клавиатуру, были расположены горизонтально.
2.старайтесь выглядеть достойно в глазах собеседников,
пишите грамотно,
человек, с которым вы общаетесь, может быть не один,
сдерживайте страсти,
будьте терпимы к недостаткам окружающий
3.1.1. на основании договора;
1.2. в форме воспроизведения, без согласия newsader и без выплаты ему вознаграждения, при условии, что такое использование осуществляется гражданином исключительно в личных целях.
1.3. без согласия newsader и без выплаты вознаграждения, но с обязательным указанием ссылки на newsader в соответствии с п. 5 настоящих правил в виде:
1.3.1. цитирования материалов или их части в оригинале и в переводе в научных, полемических, критических или информационных целях в объеме, оправданном целью цитирования, включая части текстовых материалов;
1.3.2. использования материалов и их частей в качестве иллюстраций в изданиях, радио- и телепередачах, звуко- и видеозаписях учебного характера в объеме, оправданном поставленной целью;
1.3.3. воспроизведения в прессе, сообщение в эфир или по кабелю публично произнесенных политических речей, обращений, докладов и других аналогичных произведений, если они являются частью материалов в объеме, оправданном информационной целью;
1.3.4. воспроизведения или сообщения для всеобщего сведения в обзорах текущих событий средствами фотографии, кинематографии, путем сообщения в эфир или по кабелю материалов или их частей, которые становятся увиденными или услышанными в ходе таких событий, в объеме, оправданном информационной целью;
