400
Link:
oneliner prezenty bitwy gry konkursy Pulsik SMS puls story.pl
Tytu�ek numer 1
Brak kontentu
start
jeszcze nie posiadasz konta? zarejestruj się   zaloguj

INNE (na kanale : TECHNIKA)

o czym gadamy? :

Pascal

autor:

 zynka1
20 Lat 

O forum:

data: 2011-11-08 20:19:29

rozgadani :

 

autor: posty :
 zynka1
20 Lat 
2011-11-08 20:19:29

Pascal

Hmmm... Mam problem bo niestety nie rozumiem języka pascal a mam zadanie do zrobienia a nawet dwa i nie wiem jak się za to zabrać.
Pomożecie??


Proszę o napisanie dwóch programów (wykorzystujących pętle):

1. program, który pobiera od użytkownika nieujemną liczbę całkowitą n i oblicza sumę kwadratów liczb od 0 do n, czyli wartość 0^2 + 1^2 + 2^2 + 3^2 + ... + n^2 .
2. program, który pobiera od użytkownika dwie dodatnie liczby całkowite n i m, i wypisuje w kolejnych wierszach wszystkie dodatnie wielokrotności n mniejsze od m.

Uwagi:

Przykładowo:

* program 1 po otrzymaniu od użytkownika liczby 4 powinien wypisać na ekran 30 (ponieważ 0^2 + 1^2 + 2^2 + 3^2 +4^2 = 30)
* program 2 po otrzymaniu od użytkownika liczb 3 i 14 (n:=3, m:=15), powinien wypisać
3
6
9
12
ponieważ są to wszystkie wielokrotności liczby 3 mniejsze od 15.




^ -do potęgi
 mc1111
21 Lat 
2011-11-09 21:36:59

Odp: Pascal

Program 1 smile

program prog1;
uses crt;
var
n,i,wynik:integer;
begin
ClrScr;
writeln (\'podaj liczbe\');
readln (n);
if n
epuls.pl reklamuje
2012-05-23 10:34:40