Периферийные устройства-с их помощью можно вводить или выводить информацию из компьютера.
Основные устройства-компоненты компьютера(процессор).
#include<iostream.h>
#include<conio.h>
int s[100],i,n,k,t[100],j;
main(){ randomize();
cin>>n;
for(i=0;i<n;i++){
s[i]=random(100000);
cout<<s[i]<<" ";}
cout<<endl;
j=-1;
for(i=0;i<n;i++) {
k=s[i]/10;
if(k%10==0){ j++; t[j]=s[i];}}
if(j==-1)
cout<<"NET NI ODNOGO CISLA KOTORII OTVECEAET TREBOVANIIAM"<<endl;
else for(i=0;i<=j;i++)
cout<<" "<<t[i]<<endl;
getch();}
Вы вводите символьную информацию (данное типа char) при помощи процедуры Read(). В языке Паскаль ввод должен ВСЕГДА завершаться посылкой пары кодов "перевод строки" и "возврат каретки", что и происходит при нажатии клавиши "Enter". Так, если Вы вводите латинское "А", программа получает не один символ, а три: с кодом "А", с кодом "перевод строки" и с кодом "возврат каретки". И чтение в цикле происходит сразу три раза до очередного обращения к клавиатуре. Итого получается четыре прохода по циклу: первые три символа на самом деле воспринимаются, как девять, а затем считывается четвертый, что дает десять и цикл завершается.
Для правильной работы с символьными данными (char, string) следует использовать не Read(), а Readln() и все у Вас получится. Процедура Readln() "отрезает" коды "перевод строки" и "возврат каретки".
Наибольшая площадь 25. Потому что всего ромашек 28, нам нужно, что бы они были в одном квадратике. из 28 корень не извлекается, следовательно ищем число меньше 28, из которого он извлечется. это число 25! 5 строчек, 5 столбцов)