{Кратность 5ти} var i, i1: integer; begin readln(i1); for i:=0 to i1 do if (i mod 5 = 0) then writeln(i, ': ', sqr(i)) else writeln(i, ': не кратно пяти'); end.
{ Больше 15-ти } var i, b, c: integer; begin for i:=1 to 15 do begin readln(b); if (b > 15) then c := c + 1; end; writeln(c); end.
const N=5; //Любое кол-во:) var a: real; i, count: integer; begin for i:=0 to N-1 do begin readln(a); if (a > 0) then count := count + 1; end; writeln(count); end.
Актуальная информация-важна в настоящее время.Пример-вечером ожидается гроза(прогноз погоды) или движение по таким-то улицам будет перекрыто,в связи с проведением демонстрации,заранее пользуйтесь маршрутами об"езда. Неактуальная информация может быть по-времени(устаревшая)-в 2010 году открыли новый участок трассы Москва-Дон или ненужной,неважной-курс Швейцарского франка стабилен или а Индии восстановили движение поездов(если Вы не воспользуетесь поездами в Индии в ближайшее время,то эта информация для Вас не актуальна).
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку